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1. ABSTRACT 



THIS PROGRAM TESTS FOR PROBER OPERATION OF THE HARDWARE INDEX 
REGISTER AND LIMIT REGISTER AND THEIR ASSOCIATED I'JSTRUCT lOMS . 
THE TESTS START BY VERIFYING THE SIMPLER OPERATIONS AND 
GRADUALLY BUILD IN COMPLEXITY TO TEST THE ^qre COMPLICATED 
OPERATIONS OF THE REGISTERS. THE FIRST SECTION OF TESTS 
VERIFY OPERATION OF INDEXING AND THE ASSOCIATED INSTRUCTIONS. 
THE SECOND SECTION TESTS FOR CORRECT OPERATION OF THE 
INDEXING FEATURE IN RELATION TO EXTRA FIELDS OF MEMORY, IF 
AVAILABLE. INDEXED REFERENCES FROM FIELD TO HIGHER FIELDS 
ARE FIRST TESTED. THEN A TEST PROGRAM IS RELOCATED TO EACW 
MEMORY FIELD AND CONTROL IS TRANSFERRED TO THAT FIELD TO 
TEST OPERATION OF INDEXED REFERENCES IN THAT FIELD AND IN 
THAT FIELD AND IN REFERENCf TO FIELD 0. 



2. REQUIREMENTS 
EQUIPMENT 



POP-15 EQUIPPED WITH FROM 4K TO 128k WORDS OF CORE. 
STORAGE 



THIS PROGRAM OCCUPIES CORE LOCATIONS 0'6000 OCTAL INCLUSIVE. 
5, LOADING PROCEDURE 



A. PLACE TAPE IN READER 

B. SET SANK MODE TO A 1 

C. SET ADDRESS SWITCHES TO 17700 

D. PRESS RESET, THEN READ-IN 
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4, STARTING PR0CEOU«E 

A. SELECT CONTROL SWITCH CONT I CURAT I ON DESIRED FROM THET FOLLOW- 
ING TABLE. SWITCHES 1,2,3,4,5 MUST BE SET TO INDICATE TME 
AMOUNT or CORE AVAILABLE. NORMAL POSITION OF THE SWITCHfS 
ARE AUL ZEROS (DOWN) FOR A 4K MACHINE. 

DATA SWITCHES SET AS MODE OF OPERATION 

e SUPPRESS HALTS 

1 HALT AT END OF CURRENT TEST 

1,2,3,4,5 DENOTES ABSOLUTE AMOUNT OF 

CORE IN SYSTEM. REFER TO 
TABLE IN SECTION 8. 

8 NORMAL ITERATIONS 

1 QUICK VERIFY (00 EACH TEST ONCE) 

9 PRINT ERROR MESSAGE 

1 SUPPRESS ERROR PRINTOUT 

j_0 B LOOP ON ERROR 

1 PROCEED ON ERROR 

lj_ TYPE "END" ON Pass COMPLETION 

1 suppress "END" MESSAGE 

8, SET BANK MODE TO A "1" AND ADDRESS SWITCHES TO 200 

C, PRESS RESET, THEN PRESS START 

0, PROGHAM WILL EITHER TYPE OUT MESSAGE TO PROCEED IF THE BANK 
MODE SWITCH IS OPERATIONAL OR AN ERROR WILL BE TYPED OUT. 

E, IN EITHER CASE IN ORDER TO CONTINUE PUT BANK MODE SWITCH 
TO A "0" AND PRESS RESET, THEN PRESS START. THE BANK MOOE 
SWITCH WILL BE TESTED ONLY ONCE PER PROGRAM LOAD. 



..^ 
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5. 0PERATIN6 PROCEDURE 

PROGRAM AND/OR OPERATION ACTION 



THE CONTROL SWITCHES MAY BE CHANGED AT ANY TIME WHILE THE 
PROGRAM IS RUNNING. DATA SWITCHES l,2»3,4/5 INDICATING THE 
AMOUNT Of CORE AVAILABLE A»E ONLY SENSED AT THE BEGINNING np 
THE PROGIAM. IF THESE SWITCHES ARE CHANGED WHILE THE PROGRAM 
IS RUNNING, THEY WiLL BE IGNORED UNTIL THE START OF THE NEXT PASS, 

6, ERRORS 

ERROR HALTS AND DESCRIPTION 



ERROR TYPEOUT FORMAT FOR NORMAL ERRORS 

EXAMPLE! 

ER000100 PASS»0000«tl AC"777000 L'»0 XRp700700 LR = 000002 BLK = 

THIS IS THE MAIN ERROR TYPEOUT FORMAT, THE LEADING 2ER0ES 
ARE NOT SUPPRESSED AND SHOULD 8E IGNORED. THE MEANING OF 
EACH PART OF THIS MESSAGE IS AS FOLLOWS, 

ER000i00 IS THE TAG IN THE PROGRAM OF THE TEST FAILURE {ER10B). 

PASS"000001 IS THE NUMBER OF TIMES THROUGH THIS PARTICULAR 
TEST BEFORE FAILURE. 

AC»777000 IS THE QUANTITY IN THE ACCUMULATOR AT THE TIME 
OF FAILURE. 

L50 IS THE STATE OF THE LINK AT THE TIME OF FAILURE. 

XRS700700 IS THE QUANTITY IN THE INDEX REGISTER AT THE 
TIME OF FAILURE. 

LRS000002 IS THE QUANTITY IN THE LIMIT REGISTER AT THE 
TIME OF FAILURE, 

BLK=0 IS TME 32K BLOCK OF CORE CURRENTLY UNDER TEST 

THE ERROR TAG IS USED IN CONJUNCTION WITH THE PROGRA" 
LISTING TO DETERSIVE WHICH TEST IS FAILING ANQ WHAT IS 
BEING TESTED. Tue PaSS NUMBER MAY BE HELPPUL IN 
DETERHIMNG THE NATURE Of THE PaILURE. WHETHER IT IS A 
HARD FAILURE (WIRING E^ROR OR OEAO CIRCUIT) OR A SOFT 
FAILURE (WIRING FRROR OR OEAT CIRCUIT) OR A SOFT FAILURE 
(LOOSE WIRE flF INTERMITTENT CIRCUIT). EACH TEST IS OONE 
4096 TIMES) IF THE PASS mUMBER IS GREATER THAN 1 IT 
INDICATES A PROBABLE SOFT FAILURE. 



V 



PAGE 5 



(6 CONT'D) 



B, ERROR TYPEOUT fOR ABVORmaL ERRORS 

EXAMPLE! 

CAL 4DRa003750 TST AOR»000323 AC=707707 XR=037000 BLKs?! 

THIS ERROR rORMAT IS CAUSED 8V EITHER PROGRAM SELF 
MODIFICATION OR WRONG ADDRESS CALCULATION AND TRANSFER OF 
CONTROL TO THIS WRONG ADDRESS, THE MEANING OF EACH PART 
IS AS FOLLOWS, 

CAL AORS003750 IS THE ADDRESS THAT WAS ERRONEOUSLY EXECUTED. 

TST AORS000323 IS THE ADDRESS OF THE CURRENT TEST WHEN CAL 
OCCURRED. 

AC=707707 IS THE QUANTITY IN THE ACCUMULATOR AT THE TIME OF 
FAILURE. 

XR=037000 IS THE QUANTITY IN THE INDEX REGISTER AT TIME OF CAL 
BLKS0 IS THE 32K BLOCK OF CORE CURRENTLY UNDER TEST. 
ERROR RECOVERY 



THERE ARC TWO TYPES OF ERRORS THAT HAVE SPECIAL RECOVERY 
PROCEDURES. THE FIRST TYPE OF ERROR IS THE CAL. A CAL 
OR JMS 20 WILL FIRST TYPE OUT THE CAL ADDRESS, TEST 
ADDRESS AND THE CONTENTS OF THE AC AND THEN HALT, IF 
CONTINUE IS PRESSED THE PROGRAM WILL START THE FAILING 
TEST OVER AGAIN. THE SECOND TYPE OF ERROR IS WHEN THE 
COMPUTER HANGS ATTEMPTING TO REFERENCE A LOCATION IN 
NON EXISTENT MEMORY, THIS CAN BE VERIFIED BY EXAMINING 
THE OA WHICH SHOULD MOT CONTAIN AN ADDRESS GREATER THAN 
THE CORE AVAILABLE. IN THIS CASE WRITE DOWN THE CONTENTS 
OF THE MAJOR REGISTERS AND RESTART IN LOCATION 21 WHICH 
WILL CAUSE THE TEST ADDRESS AND CONTENTS OF THE ACCUMU- 
LATOR TO TYPE OUT AS IN CAL, PRESSING CONTINUE NOW WILL 
RESTART THE FAILING TEST, 
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7, RESTRICTIONS 



THE BASIC INSTRUCTION' TfsTS AND EXTe:\DE:D MEmQRV TESTS 
^'UST HAVE RUN SUCCESSruLL " , 



8, MISCELLANEOUS 
EXECUTION TIME 



EXECUTION TIME IS OEPEMDENT ON THE AMOUNT OF EXTRA MEHORV 
AVAILABLE. APPROXIMATE RUM TIMES FOR ONE PASS IS AS FOLLOWS 
FOR A MEMORY CYCLE TIME OF 8a0NS, 

4K-26 SECONDS 
8K-29 SECONDS 
12K-33 SECONDS 
16K-37 SECONDS 
20K-41 SECONDS 
24K-45 SECONDS 
29K-.49 SECONDS 
32K-53 SECONDS 



(8 CONT'D) 








DATA 


SWITCH POSITIONS 


TO indicate: cce 


AVAIL 


DATA 


SWITCHES 


SET AS 


tota 


1.2, 


,3.4|5 


00000 


4K 






00001 


8K 






00010 


12K 






00011 


16K 






00100 


20K 






00101 


24K 






00110 


28K 






00111 


32K 






01000 


36K 






01001 


40K 






01010 


44K 






01011 


48K 






01100 


52K 






01101 


56K 






01110 


60K 






01111 


64K 






10000 


6eK 






10001 


72K 






10?I10 


?6K 






10011 


80K 






10100 


e4K 






10101 


seK 






10110 


92K 






10111 


96K 






11000 


100K 






11001 


104K 






11010 


laeK 






11011 


112k 






11100 


11*K 






11101 


120K 






11110 


124K 






11111 


12BK 



PACE 7 



TOTAL CORE PRESENT ISI SYSTEM 



PACE - 

9, PROGRAM OeSCRIPTION 



rOlLOWINO IS A VERBAL FLOW CHART OP THE PROGRAM TLOW. THE 
A STEPS CONSTITUTE THE INITIALIZATION THAT OCCURS WHEN THE 
PROGRAM IS STARTED, THE B STEPS ARE CONCERNED WITH THE RUNN- 
ING or EACH SEPARATE TEST, THE C STEPS EXPLAIN THE CAL TYPE 
ERROR HANDLING PROCEDURES AND THE D STEPS EXPLAIN TME NORMAL 
ERROR HANDLING P»OCEOURES. 

If NOTHING IS LISTED IN THE DECISION BOX THE NEXT STEP HILL 
BE EXECUTED. IF A OtClSION POINT IS REACHED EITHER THE 
NEXT STEP WILL BE EXECUTED OR CONTROL WILL BE TRANSFERRED 
DEPENDING ON WHERE THE YES OR NO DIRECTS THE PROGRAM. 

DESCRIPTION OF STEP YES NO 

DETERMINE CORE AVAILABLE PRQM AC 
SWITCHES 1-5 AND SET CORE INDICATORS 

ZERO UNUSED CORE IN FIELD Uj 
INITIALIiE LOOP COUNTER 

TRANSFER CONTROL TO g00 

START OF TEST ROUTINE 

INITIALIiE CAL HANDLER 

GET LOOP COUNTER AND TEST FQR 
CORRECT TEST ADDRESSING 

IS LOOP COUNTER 0» 0»LEGAL ENTRY C00 

SET AND SAVE ADDRESS OF NEXT TEST 

INITIALIIE LOOP COUNTERl CLEAR ERROR 
FLAG FOR THIS TEST 

EXECUTE THIS TEST, OIS THIS TEST PASS? C00 

TRAP BAD ADDRESSING. IS THIS TEST 

ADDRESS 9A0t IS IT GREATER THAN NEXT 

TEST ADDRESS? CB0 

IS ERROR FLAG SET? 9Z6 

UPDATE LOOP COUNTER. IS COUNTER 0T g06 



STEP 

NO. 


SUB 
NAME 


A00 


SENS 


A01 


IERF0 


A02 




B00 




B01 


REPEAT 


602 


REPEAT 


B03 


REPEAT 


B04 


REPEAT 


B05 


REPEAT 


B0« 


REPEAT 


907 


DONE 


B0S 


DONE 


909 


DONE 



r 
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19 CONT»D) 



STEP 
NO. 



SUB 
NAME 

DONE 



Bll 


DONE 


812 


DONE 


C00 


TVPCAL 


C0i 


TYPCAL 


C02 


TYPCAL 


CBS 


TYPCAL 


C04 


TYPCAU 


C05 


TYPCAU 


000 


SETUP 


001 


SETUP 


002 


SETUP 


D03 


SETUP 


D0* 


SETUP 


005 


SETUP 



006 



SETUP 



OESCPIPTIO*) YES NO 

!S ACa SET (MALT AT END OF 

CURRENT TEST)? 812 

HALT WITH TEST ADDRESS IN AC 

UPDATE TEST ADDRESS AND TRANSFER 
CONTROL TO NEXT TEST STARTING 
AT BfZ. 

CAL HANOLERl SAVE AC 

IS ACl (SUPPRESS ERROR TYPEOUT) 

SET? C0S 

HALT WITH LAW 777(76077) IN AC 

PRINT CAL ADDRESS AND CONTENTS 
OF AC 

HALT HEREI GO TO C05 WHEN CONTINUE 
IS PRESSED 

TRANSFER CONTROL TO 006 TO TRY 
CURRENT TEST AGAIN 

SAVE AC AND LINK. IS BIT 9 

(SUPPRESS ERROR TYPEOUT) SET? 002 

PRINT THE P'OLLOWING ON TTY« ERROR 
NUMBER PASS NUMBERi CONTENTS OF 
AC. LINK, IR, LR 

IS BIT (HALT AT END OF TEST) SET 02* 

HALT HEREJ GO TO 004 WHEN 
CONTINUE IS PRESSED 

is BIT Ig (LOOP ON ERROR) SET? 

CLEAR LOOP COUNTER. TRANSFER 
CONTROL TO NEXT TEST STARTING 
AT BP0 

SET LOOP ON ERROR FlAGI LOOP IN 
CURRENT TEST BE TRANSFERING CONTROL 
TO 876 
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LISTING 



PAGC 



INDX15 



70776? 

740040 
707741 
707761 
734000 
700406 
700401 
700402 



/PDP-i5 HARDWARE INDEX RpGlSTER TEST 

/MA1NOEC-15-O0AC 

/COPYRIGHT 1969,l97i«, OISlTAU EQUI^'MENT cORR,. HAYNARDi MASS. 

/ BY ROBERT Ai WHITTON 

/ REV, OCT. 1# 1970 

/ 

/AC SWITCH OPTIONS 

/AC0«1 HAUT AT END Of CURRENT TEST OR HauT |N ERROR LOOP 

/ACl,2,3,4,5 NUMBER OF ADDITIONAL ^K MEmcRV rllLOS AVAILABLE 

/AOSul QUICK VERIFY <D0 EACH TEST ONCE) 

/AC9fl SUPPRESS ERROR TYPEOUT 

/AC10»1 PROCEED ON ERROR 

/ACllfl SUPPRESS END HCSSA6E TYPEOUT 

/INSTRUCTION EOUALITICI 

/ 

EPA»707762 /ASSERT pA6E NODE 

HALT»740040 /HALT 

SKP15-707741 /SKIP \r PROCESSOR IS A PDP»i5 

SBAP707761 /SKIP IF IN BANK MODE 

CLAC«734000 /CLEAR AC 

TLSi700406 /1.0A0 TELEPRINTER BUFFER AND PRINT 

TSF-7004BI /SKIP ON TELEPRINTER FLAG 

TCF»700402 /CLEAR TELfPRlNTfR 

/ 

/ 



/o 



PACE 



1N0X15 



IN0X15 









.TITLE 


1M0X15 








.ABS 




00200 






,LOC 200 






/TESTl. 


•TEST PDP9/15 MODE SWITCH 






/START 


PROGRAM 


IN PDP»15 MOOC 


00200 


204223 


T1,0 


LAC 


rTJTLC 


00201 


740200 




SZA 




00202 


600206 




JM(» 


.•4 


00203 


104224 




JHS 


TYPE 


00204 


005566 




MTITLE 




00205 


444223 




ISI 


rriTLE 


00206 


104403 




JM8 


TCORE 


00207 


104104 




JH5 


SENS 


00210 


104342 




JHS 


iERF0 


00211 


104000 




JMS 


REPEAT 


00212 


000250 




T2.0 




00213 


204215 




LAC 


BANKSW 


00214 


740200 




SiA 




00215 


600224 




JMR 


CYCLE 


00216 


707761 




SIA 




00217 


604734 


ERl 


JMP 


HI 


00220 


444215 




ISI 


BANKSW 


00221 


104224 




JHS 


TYPE 


00222 


005603 




MCONT 




00223 


740040 




HALT 




00224 


707761 


CYCLE 


SBA 




00225 


741000 




SKP 




00226 


604736 


ER2 


JMP 


H2 


00227 


707764 




CBA 




00230 


707761 




SBA 




00231 


604740 


tR3 


JMP 


H3 


00232 


707764 




CBA 




00233 


707761 




SBA 




00234 


604742 


ER4 


JMP 


H4 


00235 


707762 




EPA 




00236 


'07761 




SBA 




00237 


741000 




SKP 




00240 


604744 


ER5 


JMP 


H5 


00241 


707762 




EPA 




00242 


707761 




SBA 




00243 


741000 




SKP 




00244 


604746 


ER6 


JHP 


H6 


00245 


707741 




SKP15 




00246 


604750 


ER7 


JMP 


h7 


00247 


104023 




JMS 
.EJECT 


DONE 



/HAS TITLE BEEN PRINTCOI 

/YES, Skip it 

/PRIMT TITlC 



/OETERMInC how much EXTRA MEMORY AVAILABLE 



/HAS THIS TEST BEEN DONE? 

/YlSi Skip it 

/CRRORi MACHINE NOT IN BANK MODE 



/SKIP IF IN BANK MODE 

/ERRORi MACHINE IS NOT IN PACE MODE 
/SIT TO BANK MODE 

/SKIP \F In bank mode 

/ERRORi SHOULD BE IN BANK MODE 

/SIT TO BANK MODE 

/SKIP ir In BANK MODE 

/ERRORi ePA COMPLIMENTS MODE FLOP 

/SIT TO PAflt MODE 

/SKIP ir IN BANK MODE 

/ERRORi should BE IN BANK MODE 
/SET TO pAOE MODE 
/SKIP Ir IN BANK MODE 

/ERRORi eBA COMPLIMENTS MODE fLOP 
/SKIP ir PROCESSOR IS A PDP-15 
/E«RORi PROCESSOR NOT A P0P«>l5 



// 



P*GK 



IM0X15 IN0X15 



/TEST 
/ 

/TEST 
/ 



00253 


104000 


T2,a 


00251 


00R264 




00252 


7500P1 




00253 


722030 




P0254 


750000 




00255 


73^^00 




00256 


54S630 




00257 


741000 




00263 


6047S2 


ER13 


0026i 


75PgB0 




00262 


72lg00 




00263 


104023 


/TEST 

/ 

T2,l 


00264 


10^680 


00269 


^0g«76 




00266 


750000 




00267 


722000 




00270 


73ie00 




00271 


740200 




00272 


604754 


ER14 


00273 


753001 




00274 


722008 




00275 


104023 


/TEST 

/ 

T2.2 


00276 


104g0(? 


00277 


000312 




00300 


750001 




00301 


721000 




00302 


760000 




00303 


724000 




00304 


545630 




00305 


741000 




00306 


604754 


ER15 


00307 


750000 




00319 


721000 




003H 


104023 


/TEST 


00312 


104000 


T2,3 


00313 


!"00324 




!'?314 


750000 




00315 


721000 




Je5i6 


724000 




?e3i7 


740200 




00320 


604760 


ER20 


00321 


750001 




0032? 


721000 




00323 


104023 





2-TEST ACXRiUR DATA PATHS WiTH OnCS AND 2ER0E8 
2i0»TEST AC«LR DATA PATH WITH TRANSFER OF ONES 

JMS REPEAT 
T2,l 
CIC 
PAL 
CLA 
PLA 

SAD (777777 
SKP 

JMP Hl3 
CUA 
PAL 

JMS OONt 
2,1"TEST AC-LR DATA PATH WITH TRANSFER Or 2ER0ES 



/AUU ONES IN AC 
/PUACE AC IN LR 

/PtACE LR IN AC 

/SKIP Jr AC NOT ALL ONES 

/ERROR, 9AD (1) DATA TRANSFER 

/RtlNITuLliE 

/PtACE HEROES IN LR 



JMS REPEAT 
T2,2 

CLA 
PAL 
PLA 
SEA 

JMP H14 
CLC 
PAL 

J|XS OONt 
2,2» TEST AC»Xr data PATH WITH TRANSFER QF ONES 

JHS REPEAT 

T2,3 

CLC 

PAX 

CL* 

PXA 

SAO (777777 

SKP 

JMP H15 
CLA 
PAX 

J>^S DONE 
2.3-TEST AC«XR DATA PATH WITH TRANSFER OF ZEROES 



/PLACC AC IN LR 
/Pi.AC€ LR IN AC 

/ERRORi bad {0> DATA TRANSFER 

/REINITIALIZE LR WITH ONES 



/AI.L ONES IN AC 
/PUCE AC IN XR 

/PLACE AC IN XR 

/SKIP Ir AC NOT ALL ONES 

/CRRORi BAD (1» OATa TRANSFER 

/REINITIALIZE XR WITH ZEROES 



JMS 

T2,4 

CLA 

PAX 

PXA 

S2A 

JMP 

CLC 
PAX 

JMS 
.EJECT 



REPEAT 



H20 
OONt 



/PLACE AC IN XR 
/PLACE XR IN AC 

/ERROR, BAD (0) DaTa TRANSFER 

/REINITIALIZE XR WITH ONES 



/> 



PACE 



IN0X19 



IN0X18 







/TEST 

/ 
T2,4 


2,4-TEST 


02324 


10400? 


JMS 


00325 


^00341 




T2,5 


00326 


750001 




CLC 


00327 


72200P 




PAL 


0033f5 


73100«! 




PLX 


00331 


790000 




CLA 


00332 


724000 




PXA 


00333 


549630 




SAO 


00334 


741000 




SKP 


00339 


604762 


ER21 


JHP 


0033« 


750000 




CLA 


00337 


721000 




PAX 


00340 


104023 




JMS 






/TEST 


2,5»TEST 


00341 


104000 


T2.9 


JMS 


08342 


000354 




T2i6 


00343 


750000 




CLA 


00344 


722000 




PAL 


00349 


731000 




PLX 


00346 


724000 




PXA 


00347 


740200 




S8A 


00350 


604764 


CR22 


JMP 


00391 


750001 




CLC 


00392 


721000 




PAX 


00353 


104023 




JMS 






/TEST 

/ 

T2.6 


8,6«TEST 


00354 


104000 


JMS 


00399 


000371 




t2,7 


00356 


750001 




CLC 


?0357 


721000 




PAX 


00360 


726000 




PXL 


00361 


750003 




CLA 


00362 


730000 




PLA 


00363 


549630 




SAD 


00364 


741000 




SKP 


t^0365 


604766 


ER23 


JMP 


00366 


750000 




CLA 


00367 


722000 




PAL 


PI0370 


104023 




JMS 
.EJECT 



REPEAT 



(777777 

H21 



DONE 



REPEAT 



H22 



DONE 



REPEAT 



(777777 

H23 



DONE 



PATH WITH TRANSFER OF ONES 



/ALL ONES IN AC 
/PLACE AC IM UR 
/PLACE LP IN XR 

/PLACE XR IN AC 

/sHiP IF AC NOT ALL ONES 

/ERROR* BAD (1) DAT* TRANSFER 

/RClNlTuLliE XR WITH 2ER0IS 

PATH WITH TRANSFER OF ICROES 



/PLACE AC IN LR 
/PtACE LR IN XR 
/PLACC XR IN AC 

/ERRORi BAD <0) DATA TRANSFER 

/RtlNlTjALIiE XR WlTH iEROES 

PATH WITH TRANSFER OF ONES 



/AtL ONES IN AC 
/PLACE AC IN XR 
/PLACE XR IN LR 

/PLACE LR IN AC 

/SXIP IF AC NOT ALL ONES 

/ERRORi RAO (1) DATA TRANSFER 



/RElNlTuLIiE LR WITH ZEROES 



J 



PhQt 



IM0X15 



IN0X15 



00371 


104000 


212372 


■^3^5434 


^0373 


750002 


30374 


721000 


f!e375 


726000 


00374 


73a80'3 


00377 


740200 


?040F 


604770 


?!0401 


750031 


510402 


722000 


5^0403 


104023 


00404 


104000 


00405 


^00415 


00406 


75B00i 


?0«07 


T28000 


0041R 


545630 


00411 


741000 


e-e^is 


6047^2 


«50<iS 


736000 


?a4i4 


104023 


00415 


104000 


20416 


?00426 


00417 


750001 


00420 


721000 


20421 


545630 


00422 


741000 


00423 


604774 


00424 


735000 


00425 


104023 


00426 


104000 


00427 


?00442 


00430 


750001 


00431 


72100? 


00432 


724000 


00<33 


75000e 


00434 


724000 


00435 


545631? 


00436 


741000 


00437 


604776 


0044? 


735000 


00441 


104023 



/TEST 2,7-TEST XR TO IH 0*TA PATH «rTH TR*N|rER Of ICROES 

/ 

T2.7 JHS SEPEaT 



ER24 



JHS 

T2,30 

CLA 

PAX 

PXL 

PL* 

SiA 

etc 

siAL 



H24 



3'^t 



/PLACE AC I^ X« 
/PLACE XR IN LR 
/PLACE LS !N ^C 

/fS«QRi 9A0 (0> OATa TSANSFER 

f'RElwlTuLllE !,« wI"!=H ONES 



/TEST 2.88 s TEST THAT AC TO LR OONE ^'0T ArrtCT AC 
/ 

REPEAT 



T2t80 



ERgS 



T2i8i 
CLC 

PAL 

SAD 

3KP 

J MP 

SLLR 

JHS 



{7777: 

h25 



/All O^IS !M AC 
/PLACE At; ffV yR 
/CNECK IF AC 0|Prs:«eNT 

/Ef?flDHi &Q 3M0UU0 CO^TAliM ^77771 



OONfc 

/T?,8i " TEST T^AT AC TO XR DOES NOT *PfeCT aC 
/ 

REPEAT 



T2,8l 



ER30 



/T2,82 

/ 

T2,82 



T2t82 

CLC 

PAX 

SAO 

3KP 

J><l» 

CLX 

JMS 



(777777 

h30 
OONt 



/aLL ones in AC 
/PLACE AC IN XS 
/CNECK IP AG 0irFE3E\'f 

/ESRQSj AC SNogs.0 Gom^iN mill 



TEST THAT XR TO AC DOES NOT AFfeCT XS 



EP3l 



J?^S 

T2,63 

CLC 

PAX 

PXA 

CLA 

PXA 

SAD 

SKP 

JMP 

CL« 
JHS 
.EJECT 



REPEAT 



(777777 

W31 

aoNiE 



/ALL O^ES !N AC 

/PLACE AC IN XP 

/PLACE XR \h AC 

/CLEAR AC Af^D PLACE THE 

/XR IN AC TO SEC IF AFFECTED 



/ERROR. AC ♦ XR SHOULD CONTAIN 777777 




PAGE 



IN0X15 



IMOXiS 







/T?,e3 


- TEST 


THAT LB TO 


00442 


104000 


/ 

T2i83 


JMS 


REPEAT 


3?443 


:500456 




T2,84 




30444 


750001 




CLC 




00445 


722000 




PAL 




00446 


730000 




PLA 




00447 


750000 




CI.A 




00450 


730000 




PL* 




00451 


545630 




SAO 


<777777 


00492 


741000 




SKP 




00493 


609000 


ER32 


JMP 


H32 


00454 


736000 




ciu« 




00455 


104023 




jMS 


DONE 






/T2,e4 


- TEST 


THAT XR TO 


00456 


104000 


T8i84 


JMS 


REPEAT 


00457 


300473 




T2,85 




00460 


750001 




CLC 




00461 


721000 




PAX 




00462 


726000 




PXL 




00463 


750000 




CL* 




00464 


724000 




PXA 




00469 


549630 




SAD 


(777777 


00466 


741000 




SKP 




00467 


609002 


ER33 


JMP 


H33 


00470 


736000 




CLLR 




00471 


735000 




CLX 




00472 


104023 




JMS 


DOME 






/T?,85 


» TEST 


THAT LR TO 


00473 


104000 


T2i85 


JMS 


•REPEAT 


00474 


000510 




T3,0 




00479 


750001 




CLC 




00476 


722000 




PAL 




00477 


731000 




PLX 




00900 


790000 




CLA 




00501 


730000 




PLA 




00502 


545630 




SAD 


(777777 


00503 


741000 




SKP 




00904 


609004 


ER34 


JMP 


M34 


00505 


736000 




CLLR 




00506 


735000 




CLX 




00507 


104023 




JMS 


DONE 








.EJECT 



AC DOES NOT AFfcCT LR 



/ALL ONES IN AC 

/PLACE AC IK LR 

/PLACE LR IN AC 

/CLEAR AC AND PLACE THE 

/LR in AC TO SEE IF AFFECTED 



/ERRORi AC ♦ LR SHOULD CONTAIN 777777 



LR DOES NOT AfPECT THE XR 



/ALL ONES IN AC 
/PLACE AC IN XR 
/PLACE XR IN LR 



/CET CONTENTS OF XR IN AC 



/|«ROR| AC • XR SHOULD CONTAIN 777777 



XR DOES NOT ArFEOT THE UR 



/ALL ONES IN AC 
/PLACE AC IN LR 
/PLACE LR IN XR 



/CET CONTENTS Of L" IN AC 



/E^RORiAC * LR SHOULD CONTAIN 777777 



/^ 



<»ACE 



INDX19 



IN0X15 



00511? 


10400':^ 


00511 


300521 


00512 


754003 


00513 


734000 


00514 


740200 


00315 


605006 


00516 


74S!40e 


00517 


605010 


0052? 


104823 


00521 


ia4000 


00522 


030532 


£^0523 


?50i0i 


00524 


721000 


P0525 


739«00 


00526 


72*000 


0i327 


743200 


00S30 


609013 


00531 


104023 


■?8532 


104000 


?'0I33 


Z00543 


0Sf34 


730001 


00535 


722000 


00534 


73*800 


00537 


730000 


00540 


741^203 


?'0541 


605014 


00542 


104023 



/ 

/TEST 

/ 

/TEST 

I 

t3,0 



/TES1 
/ 



3- TEST Clear xRiLRiAc 

3,i3"TEST CLEAN AC wITH CLAC BuT Mqt THE LINfK 



JMS REPEAT 
T3,l 

CLA!ELL!CMA!CML 

CLAC 

SiA 

JHP H3S 

JHP h40 

JN$ SONfc 

.l^TCST Cutis m 



/ 

''3i; 



:r42 



T V s n 

PAX 
Ck,A 

OKA 
SiA 

JHS 
a 2 ^ ^ E S T 

j^S 
T4|0 
w W ^ 

CLl» 
PL,* 

JM(S 

JMS 
.EJECT 



9.191 



'LEA R u '• 
.R E P E * f 






/SET AC « LiNfK TO OnIES 
/CUAH AC 

/|f<«OR! AC OlO MOT jLlAR 

/C^^ORj -L,AC CLi.4^it:o THE \^\m 



/SET 4C Tu 


J, 


.1, 


/Pw*Ct AC 


!« 


fH 


/CUEAM x« 






/PkACt jts IN 


AC 



/SE" AC TO Ai 

/FUer Act i^i" 



/|«RORs 



DIP 



'■ I Ct-s. 



LEAR 



^ 



PA8E 8 



INDXIJ 



1N0X15 



00943 
1^0944 
00549 
00946 
00547 
00590 
00951 
00992 
00993 
00954 
00999 
00956 
00597 



00560 
00561 
00562 
00563 
00564 
00969 
00566 
00567 
00570 
00571 
00972 
00973 
00574 
00575 



00976 

00577 

00600 
00601 
00602 
00603 

00604 
0060S 
00606 
550607 
00610 
00611 
?'06l2 



10403P 
000560 
739000 
750000 
722000 
73000^ 
750001 
722000 

730000 
724000 

740200 
609016 
104023 



104000 
000976 
790001 
721000 
722000 
730000 
750000 
722000 
730000 
724000 
945630 
741000 
605020 
104023 



104000 
000613 
736000 
799992 

72100? 

724000 

790001 
721000 
7i49t<l 

730000 
74020? 
609022 
104023 



/TEST* 

/ 

/TEST 

/ 

T4,0 



ER43 

/TEST4 
/ 

T4il 



eR44 

/TEST 

/ 

T4,2 



ER45 



; TEST ir 

4,a»TEST 

JMS 
T4,l 

cux 

CUA 
PAU 

PLA 

Ci.C 
PAU 

PLA 
PXA 
9IA 

jmP 

,l«TlST 1 

JMS 
T4,2 
CLC 
PAX 
PAL 
PLA 
Ci,A 
PAL 
PLA 
PXA 
SAO 
SKP 
JMP 
JHS 
4,2-TEST 

JMS 

T4|3 

CLLP 

CLA 

PAX 

PXA 

CLC 

PAX 

PXA 

PLA 

SiA 

JMP 

JMS 
.EJECT 



AC|XR,l.R DATA PAThS AFFecT CACH OTHEP 
IF AC.1.B oaTA PATM AFFECTS 2E906S IN XR 
REPEAT 



/CLEAR XP 

/TRANSFER ONES « iCROES BCtWECN AC AND LR 



H43 
DONE 



/i^lP IF Xi STILL I5R0 

/fRRORf ACiuR TRANSFER ArFKCTED Xfl 



F AC-LR OATA PATH A^rCCTS ONCS IN XR 
REPEAT 

/PLACC ONCt IN XR 

/TRANSFER ONEI ♦ lEROlS SCtwCEN AC • UR 



(777777 

H44 
DONE 



/$KIP If XR HAS CHANQCO 

/F^OH All ONES CONDITION 

/tRRORi ACiLR TRANSFER AFfECTCO LR 



IF AC-XR DATA PATH AFF|CT8 IEROIS IN LR 
RCRtAT 



H45 

DONE 



/CLEAR LR 

/Tf^ANSPER ONES « iCROCS BETWEEN AC * XR 



/PLACE LR tN AC 

/S«IR IF LR STILL 2CR0 

/E^RORi *CixR TRANSFER AFFECTED LR 



/7 



PA6C 



IN0X15 



iNOXiS 



?0613 

00615 
0061« 

ZI0620 
00181 
00622 
00623 

00624 
00625 
00626 
00627 
00630 



00631 
00632 

00633 
00634 

00635 
00636 
00637 
00640 
30641 
30642 
00643 
00644 
00645 



00646 
00647 
00650 
006S1 
00652 
00653 
00654 
00655 
00656 
00657 
00660 
00661 
00662 



104000 
000631 
750001 
722000 
721000 
724000 
750000 
721000 
724000 
730000 
545630 
741000 
609024 
104023 



104000 
000646 
736000 
739000 
750001 
722000 
750000 
731000 
736000 
726000 
740200 
605026 
104023 



104000 
000663 
736000 
739000 
750001 
721000 
726000 
735000 
731000 
545630 
741000 
609030 
104023 



/TEST 
/ 

T4,3 



ER50 

/TEST 

/ 

T4,4 



CR51 

/TEST 
/ 

T4,5 



4,3-TCST ir AC»XR DATA l»ATN *rr|CTS ONES IN (.« 

JMS REPEAT 

T4,4 

CLC /PLACE onE» in in 

P*L 

P*X /TRANSrcR ONES ♦ 2ER0ES BETWEEN AC ♦ XR 

PXA 

CL* 

PAX 
PXA 
PL* 
SAD 
SKP 
JMP 
JM$ 
4,4»TEST 



(777777 

H5f 
DONE 



/SKIP Ir XP HAS CHANGED 

/rROM ALL ONES CONDITION 

/CROii aC>XR TRANSfER Af^tCTED lR 



ER52 



JMS 
T4,5 

CLLR 
CLX 

cue 

PAt 
CU 
PLX 
CIWR 
PXU 
SZA 
JMP 
JM$ 
4.9-TEST 

JMS 
T5,0 

CLUR 

ctx 

CLC 
PAX 
PXL 

cux 

PLX 
SAD 
SKP 
JMP 
JMS 
.EJECT 



ir UR-XR DATA PATH AprtCTS iCPOES IN AC 
REPEAT 

/CLEAR LR 
/CkiCAR XR 

/PLACE ONll IN LR 

/TRANSFER ONEl lETWEtN LR-XR 

/8KJP If AC STILL lERO 
H5i 
DONE 
IF L«»XR DATA PATH APFICTS ONES IN AC 

REPEAT 

/CLEAR LR 
/CtEAR XR 

/PLACB OnCS IN XR 

/TRANSFER ONES BETWEEN XR-LR 



(777777 

H52 

DONE 



/S^IP Is AC STILL ALL ONES 
/ERRORi lR-XR data PATH AFPECTS *C 



1 




PACC 10 



1N0X15 



IN0X15 



00663 
Z0664 
00665 
00666 
00667 
00670 
00671 
00672 
00673 
00674 
00679 
00676 
00677 
00700 
00701 



00702 
00703 
00704 
00709 
00706 
00707 
00710 
00711 
00718 
00713 
00714 
00718 
00716 
00717 



00720 

00721 
00722 

00723 
00724 
00729 
00726 
00727 
20730 
00731 
00732 
00733 
00734 
30735 



104000 
000702 
209631 
722000 

721000 
734000 

730000 
949631 
741000 
609032 
724000 
549631 
741000 
609034 
104023 



104000 
700720 
209631 
721000 
736000 
549631 
741000 
609036 
790000 
724000 
549631 
741000 
609040 
104023 



104000 
000736 
209631 

722000 
739000 

549631 

741000 
609042 
750000 
730000 
549631 
741000 
609044 
104023 



/ 

/TEST 
/ 

/TEST 
/ 

T5,0 



ER63 



ER54 

/TCST 

/ 

T9i1 



{;R95 



CR96 

/TIST 

/ 

T9,2 



£"60 



ER61 



9-Tt5T If 

5,0-TEST 

JMS 
T9,l 
LAC 
PAL 

PAX 
CLAC 

Pt* 
SAO 
SKP 

JHP 
PXA 
SAO 
SKP 
JMP 
JHS 
9,1»TEST 

JHS 

T9i2 

lAC 

PAX 

CII.P 

SAO 

SKP 

JMP 

CLA 

PXA 

SAO 

SKP 

JMP 

JMS 
9,2»TtST 

JMS 
t9,3 

L*C 
PAL 
CLX 
SAD 
SKP 
JMP 
CLA 

PLA 
SAO 

SKP 
JMP 
JMS 
.EJECT 



CLC*R AC.LRiXR APrCCT lACH OTHER 
THAT CLEAR AC WITH CLAC OOES NOT AfPECT LR OR XR 

REPEAT 

(S8!)292 /place alternate ONES ♦ 2IR0C8 IH LR AND XR 

(52»252 /SKIP ir LR HAS CHANCED 

H55 /C«RORi L" AmCTIO BY CLAC 

(5g!>292 /SKIP IF XR HAS CHANGED 

H94 
DONE 
THAT CLf DOES NOT AfFECT aC OR XR 

REPEAT 

OI5252 /PLACE ALTERNATES ONES ♦ IER0C8 IN XR AND AC 



(929292 

H59 



/SKIP Ir AC ArrECTCO by clR 

/ERRORi a6 chanced BY CLP 



(92»252 

N56 
DONE 



/SKIP IF XR ArFECTED BY CL« 

/EfRORi xR CHANGED BY CLR 
THAt"cLX does not AfrECT AC 0" LR 
REPEAT 
{52>292 /PliACt ALTERNATE ONES ♦ iEROES IN LR AND AC 



(529292 

H60 

<52!>252 

H61 
DONE 



/SKIP IF AC AFFECTED BY CLX 
/E«RORi AC AFFECTED BY CLX 

/SKIP IF LP AFFECTED BY CLX 
/E«RORi lR affected BY CLX 




^A8E II 



INDX15 



INDXiS 



30736 
30737 
00740 
00741 
00742 
00743 
00744 
00745 
0074» 
00747 
00750 
00751 
00752 
00753 
00754 



00755 
00756 
00757 
00760 
00761 
00762 
00763 
00764 
00765 
00766 
00767 
00770 
00771 
00772 
00773 



104000 
000755 
205632 
722000 
730000 
545633 
741000 
605046 
209631 
722000 
730000 
545631 
741000 
600749 
104023 



104000 
000774 
209692 

721000 
724000 
545632 
741000 
609050 
205631 
721000 
724000 
545631 
741000 
600764 
104023 



/TEST 5,3-TEST 
/ 

T5,3 JMS 
T5,4 

LAC 

PLA 

SAO 

SKP 

CR62 JMP 

LAC 
PAL 
PLA 
SAO 
SKP 
JM^ 
JM8 

/TfSt 9,4«TCST 

/ 



THAT UR IS NOT PICKING UP HtS 
REPEAT 



(252525 



(292529 

H62 
(589292 



(52S252 



/PICK UP PATTERN 
/PLACE IV L« 
/GET IT BACK 
/DID IT pHlNSEt 
/HO, CONTINUE 

/YES. errOri pickeo up bit 
/8CT neh Pattern 

/PLACE in LR 

/cEt it iack 

/OlD it CHANGEt 

/yesi Picked up sits 



ER62 

done 
that xr is not picking up Bits 



T9,4 



ER63 



JMS 

T6,0 

LAC 

PAX 

PXA 

SAD 

SKP 

JMP 

LAC 

PAX 

PXA 

SAD 

SKP 

JMP 

JHS 

.EJECT 



REPEAT 
(292529 



(292525 

H6S 
(585252 



(529292 
ER69 

donI 



/OCT PATTIRN 
/PLACE IN XN 
/6ET IT BA&K 
/DiO IT qHANOEf 
/NOi CONTINUE 

/yesi ihror, pickeo up bit 

/ClT NEXT PATTERN 
/PLACE IN XR 
/elT IT 9AeK 
/OlO IT cHANCEf 

/nO, continue 

/yes# Error, picked up bit 



'-N 



^ 



PA6C 12 



IM0X15 



IN0X15 



00774 
00775 
0077* 
00777 

01000 
01001 
01002 
01003 
01004 
01009 
0100« 
01007 
01010 
01011 
131012 
01013 
01014 
01019 
01014 
01017 



01020 
01021 
01022 
01083 
01024 
01029 
0102« 
01027 
01030 
2)1031 
01032 
01033 
01034 
01039 
0103ft 
01037 
01040 
31041 
31042 
01043 
01044 



104000 
301020 
739000 
736000 
750000 
723377 
949633 
741000 
609092 
723000 
949633 
741000 
609094 
724000 
740200 
609096 
730000 
740200 
609040 
104023 



104000 
001049 
739000 
736000 
790000 
737377 
740200 
609062 
724000 
549633 
741000 
609064 
737000 
724000 
949633 
741000 
609066 
730000 
740200 
609070 
104023 



/TEST6iTCST ADD TO AC ♦ XR 

/TEST 6,0«TEST ADD MAXIMUM AMD MINIMUM POSITIVC QUANTITY TO AC WITH AAC 

/TEST THAT ADO TO AC WITH AAC DOCS NOT AfFfCT UR 0« XR 

/ 



T6,0 



ER64 

CR65 
ER66 
ER67 



JM8 
T6,l 

ctx 

CUR 

CLA 

AAQ*377 

SAO 

SKP 

JMP 

AAC*0 

SAD 

SKP 

JMP 

PXA 

SIA 

JMP 

PL* 
StA 

JMP 
JMS 



REPEAT 



(377 

H64 
(377 

HIS 

H66 



H67 
DONE 



/CLEAR XRi LRi AC 

/ADO 377 TO AC 

/SKIP ir AC 1$ NOT 377 

/iRRORi ADD 377 TO AC PAItCO 

/S^IP IF AC IS NOT 377 

/CRRORi ADD TO AC rAlLED 

/PLACC XR tN AC 

/SKIR If XR STIUU ZERO 

/CRRORi xR PICKED UP BITS 

/PUACC LR IN AC 

/SKIP Ir WR STILL lERO 

/CRRORi lR PICKCO UP 8IT DURING AAC 



/TEST 6,1-TEST ADO MAXIMUM AND MINIMUM POSITIVE QUANTITY TO XR WITH AXR 

/TESt THAT ADO TO XR W|TH AXR DOES NOT AfPlCT AC OR UR 

/ 



T6il 



ER70 
ER71 

ER72 

ER73 



JMS 
T6i2 

CLX 

CLLR 
CLA 

AXR«S77 
SiA 

JMP 

PXA 

SAO 

SKP 

JMP 

AXR*0 

PXA 

SAD 

SKP 

JMP 

PLA 

SiA 

JMP 

JMS 

.EJECT 



REPEAT 



H70 
(377 

H71 

(377 

H72 



H73 
DONE 



/CLEAR LRt XRi AC 



/APO 377 TO XR 

/SKIP ir Ac STIU iERO 

/Ef^RORi AC PICKED UP BITS DURING AXR 

/PLACE XR IN AC 



/PLACE XR IN AC 



/E^PORi aOO TO AC TAILED 

/PLACE LR IN AC 

/SKIP Ir LR STILL 2ER0 

/C^RORi lR PICKED UP BITS DURING AXR 



^/ 



PASC 13 


IN0X15 


IN0X15 












/TEST 

/ 

T6,2 


6,2 > TEST AQO MAXtMUH 


AMD MINIMUM NfOATlve QUANTITY TO AC «ITH AAC 


018145 


104000 


JMS 


REPEAT 




?104$ 


301061 




T6,3 






01047 


754002 




CLAjCLL 






0105?! 


723777 




AAC*777 




/ABO 777777 TO AC (-1) 


01051 


545630 




SAD 


(77/777 


/SKIP Ir AC IS NOT 777777 


5^1052 


741000 




SKP 






01053 


605072 


ER74 


JMP 


H74 


/|«RO(»i A08i| TO AC fAlLEO 


(51054 


723400 




AAC«400 




/AOD 7774il TO AC (-296 DECIMAL) 


(31055 


545634 




SAD 


(777377 




01056 


741000 




SKP 






01057 


605074 


ER75 


JMP 


H75 


/e'^RORi ADO >256 TO AC FAIUCD 


0106C 


104023 




JMS 


DONE 








/TEST 

/ 

T6,3 


6,3 • TEST ADD MAXINUM 


AND MINIMUM NIOaTIVE QUANTITY TO XR HITH AXR 


01061 


104000 


JMS 


REPEAT 




01062 


001077 




T6,4 






01063 


739000 




CI.X 






01064 


737777 




AXR»777 






01065 


724000 




PXA 




/PUCC XR IN AC 


01066 


545630 




SAO 


(777777 


/S'<IP IF AC 18 NOT 777777 


01067 


741000 




8KP 






01070 


605076 


ER76 


JMP 


H76 


/CRORi aOO -1 TO XR PAILED 


01071 


737400 




AXR*400 






01072 


724000 




PXA 






01073 


545634 




SAO 


(777377 




01074 


741003 




SKP 






01075 


605100 


ER77 


JMP 


M77 


/IRRORi ADD i856 TO XR FAlUED 


01076 


104023 




JMS 


DONE 








/TEST 

/ 

T6,4 


6.4 • TEST UP COgNT POR 


INOCX RCCISTCR WITH AXR*1 


01077 


104320 


JMS 


I'JITIB 


/iNITlALlil LOOP COUNTER POR 1 LOOPS 


^1100 


104000 




JMS 


REPEAT 




filial 


301122 




T6,5 






01102 


735000 




CLX 




/CLEAR inOCX RESISTER 


01103 


141120 




OiM 


K6,< 


/C^EAR MEMORY CELL UPCOUnT 


01104 


737001 


L6,4 


AXR^l 




/ADD 1 TO X« 


01105 


441120 




iSi 


K6,4 


/ADO 1 TO MEMORY CELL UPCOUNT 


01106 


741000 




SKP 






01107 


601114 




JMP 


ERt00*l 


/MEMORY CELL UPCOUNT OVERPLOWEO 


01110 


724000 




PXA 




/GET CONTENTS OP XR 


01111 


541120 




SAO 


K6,4 


/!« THE SAME A3 MEMORY CELL? 


01112 


601104 




JMP 


L6,^ 


/yESi Continue to uoop 


01113 


609102 


ER100 


JMP 


m0» 


/E^RORi xR PAlLED To INCREMENT 


01114 


724000 




PXA 




/CET CONTENTS or XR 


01115 


740200 




SZA 




/DID IT OVERFLOW? 


01116 


601113 




JMP 


,«3 


/NO, ERROR 


C1117 


741000 




SKP 




/YES, Exit 


01120 


000000 


K6«4 







/MEMORY uPCOUNT CEIL 


01121 


104023 




JMS 
.EJECT 


DONE 








PACE 14 


IN0X15 


IN0X15 










/TEST 


6,5 « TEST UPCOUNT FOR AC 


01122 


104030 


T6,5 


JMS 


REPEAT 


01123 


001142 




T6,6 




21124 


75400? 




CLAICLL 




P112» 


141140 




OiM 


K6.t) 


01126 


723001 


l6,5 


AAC*1 




81127 


441140 




isz 


K6,» 


(91130 


741000 




SKP 




i?1131 


601135 




JMP 


ERlfltl 


01132 


541140 




SAO 


K6,» 


01133 


601126 




JMP 


t.6,S» 


01134 


605104 


ER101 


JMP 


H101 


01135 


740200 




SiA 




01134 


601134 




JMP 


."2 


01137 


741000 




SKP 




01140 


000000 


K6.9 







01141 


104023 




JM$ 


DONE 






/TEST 

/ 

T6,6 


6,6 • TEST DOWN COUNT FOR 


01142 


104000 


JMS 


REPEAT 


01143 


001167 




T6,7 




01144 


750001 




CLAICMA 




01145 


721000 




PAX 




01146 


041165 




DAC 


K6,6 


01147 


737777 


L6.6 


AX»^777 




01150 


201165 




LAC 


K6.6 


01151 


345630 




TAO 


(•1 


01152 


041165 




DAC 


K6.6 


01153 


741200 




SNA 




01154 


601161 




JMP 


ERl»2*l 


01155 


724000 




PXA 




01156 


541169 




SAO 


K6,6 


01157 


601147 




JMP 


L6.6 


01160 


605106 


ER102 


JMP 


H102 


01161 


724000 




PXA 




01162 


740200 




SiA 




01163 


601160 




JMP 


.-3 


01164 


741000 




SKP 




01165 


000000 


K6|6 







01166 


104023 




JMS 
.EJECT 


DONE 



WITH AAc«l 



/CliEAR AC ANO LINK 

/CWCAR MtMORY CELL UPCOUNT 

/AOD 1 TO AC 

/AOO 1 to MEMORY CELL UPCOUNT 

/MfMORY CiLL UPCOUNT OVERfLOHED 

/If AC SAHC as memory cell UPCOUNTf 

/YlSi CONTINUE TO LOOP 

/E<^R0R» aC fAlLCO TO INCREMENT 

/OIO AC oVCRriOWf 

/nOi ERROR 

/YES, CXIT 

/MEMORY CELL UPCOUNT 

INDEX REGISTER WITH AXR*777 



/PUT 777777 INTO XR AND 
/mImORY down COUNT CELL 
/AOO -1 to XR 

/AOO ■! TO MEMORY CELL DOWN COUNT 

/DID CELL REACH 0t 

/YlSi T|fT AND EXIT 

/ClT CONTlNTS OF INDEX REGISTER 

/IS IT 8AH| as MEMORY CELL COUNT? 

/yIsi Continue to loop 

/E^RORi xR FAILED To DECREMENT 
/SET CONtENTS OF XR 
/t$ IT 0» 

/NO, EXiTi OIO NOT DECREMENT TO 

/MiMORY DOWN COUNT CELL 



/J 



PACC 15 


I>J0X15 


IN0X15 










/TEST 

/ 

T6,7 


6,7 " TEST DOWN C 


eil67 


104000 


JMS 


REPEAT 


01170 


001215 




T6,8 




01171 


750001 




CLAJCMA 




01172 


041212 




OAC 


K6,7 


21173 


723777 


L6.7 


AAC*777 




01174 


041213 




DAC 


C6,7 


01175 


201212 




LAC 


K6,7 


21174 


345630 




TAD 


(-1 


01177 


041212 




DAC 


<6,7 


012(80 


201213 




LAC 


C6,7 


01201 


741200 




SNA 




01202 


601206 




JMP 


eRi03*i 


01203 


541212 




SAO 


K6.7 


01204 


60117S 




JMP 


L6.7 


01209 


605110 


CR103 


JM^ 


H10J 


01206 


201212 




LAC 


K6,7 


01207 


740200 




S!A 




01210 


601205 




JM(» 


.-9 


01211 


601214 




JM^ 


.*3 


01212 


000000 


K6|7 







0121S 


000000 


C6,7 







01214 


104023 




JM8 


DONE 






/TEST 


6.8 • TEST 0^ INOi 






/WITH 

/ 

T6,8 


THE iANDOM NUHBCR 


01215 


104313 


JMS 


INITN 


0121« 


104000 




JMS 


RCPfAT 


01217 


001247 




T7i0 




81220 


724000 




Ptk 




01221 


041244 




OAC 


K6if 


01222 


104325 




JM8 


ranOom 


01223 


505635 




AND 


1777 


01224 


041245 




OAC 


V6.§ 


01225 


345636 




TAD 


(AXR 


01226 


041237 




DAC 


X6,tt 


01227 


201245 




LAC 


v6,a 


01230 


505637 




AND 


(400 


01231 


741200 




SNA 




01232 


601234 




JMP 


.♦3 


01233 


205640 




LAC 


(777000 


01234 


341245 




TAD 


V6,S 


01235 


341244 




TAD 


K6.a 


01236 


041244 




DAC 


K6,e 


01237 


74004P 


X6,8 


XX 




31240 


724000 




PXA 




01241 


541244 




SAD 


K6,a 


01242 


601246 




JMP 


.*4 


01243 


605112 


E«104 


JMP 


H104 


311244 


000000 


K6id 


3 




31245 


P0000Z 


V6i6 







01246 


104023 




JM8 
.EJECT 


DONE 



/PUT 777777 IN AC AND DOWN COUNT CElL 

/ADD «l TO AC 

/TfeMPORARUr SAVE AC 

/GET OOwnCOUNT memory CELL 

/AOO •! 

/PUT BACK INTO MIMORV CELL 

/OlT SAveO AC 

/I? IT YfTt 

/Yis, Test oowncount ccll 

/NO, 1$ iT THI same as OOWNCOUNT CELL 

/YiSi conTinuc to loop 

/AC fAlLCO TO DCCUCMENT 
/IS TEST CCLL 

/NOiER^OR 

/YlS EXit 

/MEMORY OOWNCOUNT C|LU 

/TEMPORARY STORAGE FOR AC 

OF^INOEX REOISTER INSTRUCTION AXR*RANDOM NUMBER 
"'~ ""INC IN THE RAnCC Of 0-777 

/RESTORE LOOP COUNTER TO NORMAL 



/SAVE XR IN SUM MEMORY CELL 
/RESTRICT SieC OF RANDOM NUMBER 

/SAVE In temporary area 

/rORM AXR*RANOOM NUMBER 
/PLACE IN EXECUTABLE LOCATION 

/TEST IF RANDOM NUMBER NEGATIVE 
/IT IS NE8ATIVE, fORM 18 BIT WORD 
/NOT NEGATIVE CONTINUE 



/UPDATE SUM MEMORY CELL 

/MOOirilO TO AXR*RANOOM NUMBER 
/GET XR 

/is it the same as sum memory cell 
/yEs, Continue 

/SUM memoRy cell 

/temporary STORAGE AREA 



^^/ 



PACe 16 



INDX15 



INDX15 



3i247 
01S50 
01251 
01252 
Z1253 
01294 
01255 
31250 
01857 
01260 
01261 
01242 
01263 
01264 



01265 

01264 
01267 
01270 
01271 
01272 
01273 
01274 
01275 
01276 
01277 
01300 
013(J1 
01302 
01303 



01304 
01305 
01306 
01307 
01310 
01311 
01312 
01313 
£'1314 
01315 
01316 
01317 
01320 
01321 
^1322 
01323 



10*000 

001245 
734000 
754001 
721000 
750000 
725001 
609114 
790001 
722000 
721000 
725000 
409116 
104023 



104000 
001304 
734000 
754010 
721000 
725000 
609120 
740010 
740100 
601271 
721000 
729000 
741000 
605122 
104023 



104000 
001324 
735000 

754030 
722000 
725000 
741000 
609124 
740010 
740100 
601310 
740030 
722000 
7290^? 
609126 
104023 



/TEST 7 - TEST AXS 

/TEST 7,0 • TEST AXS WITH EQUAL XR AND LR 

/ 

T7,0 JMS repeat 

T7.1 

CUR 

CLAjCLLICMA 

PAX 



eRii0 



ERlll 



CLA 

AXS*1 

JMP 

CLC 

PAL 

PAX 

AXS«0 

JMP 

JMS 



/CLEAR LIMIT SIGISTER 

/PLACE ALL ONCt IN INOCX RCQISTER 



Hll? 



Hill 
OONi 



/t^non, DiO NOT SKIP WHEN LR*XR'0 
/PLACE ALL ONES IN LR AND XR 



/APD T8 %n AND SKIP \F >ILR 

/ERRORi OlO NOT SKIP WHEN LR*XRf777777 



/TEST 7,1 • TEST AXS FflR $K|P CONDITION HlTH LRl» *N0 XR 

/HAS A ONE fLOATtO THROUSH IT 

/ 



T7,l 



ERlt2 



ER113 



JMS 

T7,2 

CLLR 

CLAiCLLMAC 

PAX 

AX$*0 

JMP 

RAL 

SMA 

JMP 

PAX 

AXS«0 

SKP 

JMP 

JMS 



REPEAT 



H112 

eRil2«« 



H113 
DONE 



/Ci.EAR LR 

/PUT A OnC in AC 

/PLACE IT IN XR 

/AOO TO XR, SKIP ir IT IS ■ > lR 



/SKIP ON Acetli TEST NOT COMPLETE 

/LOOP ThrOUOH TEST WITH ONE IN NEXT POSITION 

/AC0«ti STORE 400000 |N XR 

/AOO 9 TO XR AND SKIP lf*> LR 

/ERROR* SKIPPED WHEN LR>0 AND XRpNCGATIVE 



/TEST 7i2 • TEST AXS roR NON«SK|P CONDITION WHEN XRl0 AND 

/LR HAS A ONE rLOATEO THROUGH IT 

/ 



T7,2 



ER114 



ER115 



JMS 
T7,3 

CLX 

CLLICLAIIAC 

PAL 

AX$*0 

SKP 

JMP 

RAL 

SNA 

JHP 

lAC 

PAL 

AXS*0 

JMP 

JMS 

.EJECT 



REPEAT 



H114 
ERH4.3 



Hli> 
DONE 



/CLEAR XR 

/CLEAR *Ci LINK AND PUT ONE IN AC 

/PLACE AC IN LR 

/ADD TO XR. SKIP IF f > LR 

/ERRORi SKIPPED WHEN LR • > XR 
/ROTATE 3lT ANO TIST IF IT IS ACB 

/NO, LOOP THROUGH TEST AGAIN 

/AC0«Ii store 400001 IN LR 

/ERRORi olD NOT SKIP WHEN XR»0 ANO LR«MINUS 



J^ 
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1N0X15 



1V0X15 



f51324 
01325 
^1326 
01327 
f!l330 
01331 
01332 
01333 



01334 
01335 
01336 
0133T 
01340 
01541 
01342 
01343 
01544 
01345 
01346 
01347 
01350 
01351 
01352 
01353 
01354 
01355 
01356 
01357 
01360 
01361 
01362 
01363 
01364 
01365 
01366 
01367 



104000 
001334 
736000 
754001 
721000 
725001 
605130 
104023 



104000 
001370 
205631 

722000 
205632 

721000 
730000 
726000 
721000 

724000 
731000 
722000 
730000 
736000 

722000 
724000 

735000 
721000 
734000 
730000 
945631 
741000 
605132 
724000 

545632 

741000 
605134 
104023 



/TEST 

/ 

T7,3 



ER116 

/ 

/TEST 
/ 

/TEST 
/ 

T8,0 



7,3 - TEST AXS FOR NON^SKIP WITH RiPPLE CARRY IN XR 



REPEAT 



ER117 



ERt20 



JMS 

T8,0 

CLLR 

CI.AICLLICMA 

PAX 

AXS*1 

JHP H116 

JMS DONE 



/Cl.eAR LjMfT REGISTER 
/ALL ONES IN AC 

/AOO 1 TC SET XH TO 

/ERRORi SKIPPED WHEN XR«0| LR'0 



8 - TEST COMBINATIONS or INQCX REGISTER INSTRUCTIONS 

8,0 • FIRST COMBINATION INSTRUCTION EXECUTION TEST USING SHIFTS 

REPEAT 

(521>292 



JMS 

TB.l 

UAC 

PAL 

LAC 

PAX 

PLA 

PXl. 

PAX 

PXA 

PLX 

PAI. 

PLA 

CLLR 

PAL 

PXA 

CLX 

PAX 

CLAC 
PLA 

SAD 
SKP 
JMP 
PXA 

SAD 
SKP 

JMP 
JMS 
.EJECT 



(252525 



/SHIFT DaTa AROUNO PATHS 



/SMIPT DATA AND CLEAR REGISTERS 



(529252 

H117 

(252525 

H12B 
DONE 



/ERRORi BAD DATA 



/ERRORi BAD DATA 



(p 



cr 
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I^JOXIS 



I^0Xl5 



0137B 


104000 


01371 


001422 


01372 


750001 


01S73 


722000 


ei374 


721000 


01375 


707764 


01574 


707762 


B1377 


735000 


01400 


707764 


01401 


707762 


01402 


73«000 


01403 


730000 


01404 


707764 


01405 


707762 


0140A 


737100 


01407 


723100 


01410 


722000 


01411 


730000 


01412 


545641 


01413 


741000 


01414 


609136 


01415 


724000 


01416 


545641 


01417 


741000 


01420 


605140 


01421 


104023 


01422 


104000 


01423 


001444 


01424 


735000 


01425 


205633 


0142A 


722000 


01427 


734000 


01430 


707764 


01431 


707762 


01432 


734000 


01433 


725377 


01434 


605142 


01435 


707764 


0143* 


707762 


01437 


730000 


01440 


545633 


01441 


741000 


01442 


605144 


01443 


104023 



/TEST 8,1 • SECOND COHBINATJON INSTRUCTION TCST USlNS *DDi SMjrTS 
/AND HACHINE MOOC CHANCES ALWAYS EXECUTING INSTRUCTIONS IN PACE MODE 
/ 

REPEAT 



T8,i 



ER121 



ER122 



JMS 

re, 2 

CLC 

PA|, 

PAX 

EBA 

EPA 

CkX 

EBA 

EPA 

CLLR 
PLA 
EBA 
EPA 

AXP*100 

AAC*100 

PAL 

PLA 

SAD 

SKP 

JMP 

PXA 

SAO 

SKP 

JMP 

JMS 



/PLACE ALL ONES IN XR«LR 



/SANK MOOC TO PACE MODE 



/BANK MODE TO PACE MODE 
/ClEAR LP 



/ABO 100 To XRi SHOULD NOW CONTAIN 100 
/ADD 100 To aCi should now CONTAIN 100 



(100 

N121 



H122 

ooNe 



/TEST 8,2 -THIRD COMBINATION INSTRUCTION TCST USIN6 AOOS« SKIPS, 

/MACHINE MODE CHANOES AND SHIFTS 
/ 

REPEAT 



TB,2 



ER124 



ER125 



JMS 

T8,21 

CLX 

LAC 

PAL 

CLAC 

EBA 

EPA 

CLAC 

AXS*377 

JMP 

EBA 

EPA 

PLA 

SAD 

SKP 

jMp 

JMS 
.EJECT 



(377 



H124 



(377 

H125 
DONE 



^7 



PACE 19 



IN0X15 



INDX19 



/TEST 8,21"r0U«TH COmBJNaTION InIT^UCTIOK TIST USING CHAIN 

/Of xCtiX 



Z1444 


104000 


/ 
T8,2l 


JMS 


REPEA 


31445 


001477 




Te,3 




^i**i 


790030 




CLAIIAC 




01447 


721000 




PAX 




014S0 


790000 




CLA 




?1491 


411494 




XCT 


TJAiX 


ei«58 


723001 




AAC«1 




21453 


601499 




JMP 


.*2 


01454 


000000 


T8A 







01459 


411460 




XCT 


T8BiX 


3145« 


723001 




AAC*1 




01497 


601461 




JMP 


.*? 


01460 


000000 


T8B 







01461 


411464 




XCT 


T«CiX 


01462 


723001 




AAG«1 




01463 


601469 




JMP 


.♦2 


01464 


000000 


TIC 







01469 


411470 




XCT 


TSOiX 


01466 


723001 




AACn 




01467 


601471 




JMP 


.«! 


ai47B 


000000 


T80 







01471 


723001 




AAC«1 




2*1478 


723001 




AAC*1 




0147J 


549642 




SAO 


(12 


31474 


741000 




SKP 




01479 


609146 


ER126 


JHP 


H126 


01476 


104023 




JH8 
.EJECT 


DONE 






PA8C 20 



INDXlf 



IN0X19 



?1477 

01500 

01502 
01503 
81504 
01505 
0150« 
01507 



01510 
31511 
0lfl2 
01513 
01514 

01519 
01516 
aiHT 

01520 



01521 
01522 
01523 

01924 
01925 
01526 

01527 
01530 
01531 
01532 



01533 

01534 
01535 

01936 
01637 

01540 
01541 
01542 
01543 
01544 



/TEST 8,3 • TEST INTER-Rf 6I5TCR 

/BETWEEN AC AND LR 

/ 



TftANSrCR or RANDOM "^UHSERS 



104000 
301312 
104325 
722000 
730000 
544341 
741000 
609190 
104023 



104000 
001931 
104325 

721000 
724000 
544341 
741000 
605152 
104023 



104000 
001933 
104329 

721000 
726000 
730000 
544341 

741000 
609154 
104023 



104000 
001545 
104325 
722000 
731000 
724000 
544341 
741000 
405156 
104023 



t8,3 JHS 

T8,4 
JHS 
PAL 
PIA 
SAD 
SKP 
ER130 JMP 

JMS 

/TEST 8,4 

/BETWEEN AC ANO 
/ 



HE^EaT 

RANOOM 

RANB 



T8|4 JMS 
Tli5 

JMS 
PAX 
PXA 
SAO 
SKP 
JMP 
JMS 
/TEST 8,5 



H130 
DONE 
TEST INTERbRcSISTER 
' XR 

REPEAT 

RANOQM 



RANB 



ERlSl 



Hill 

DONE 
TEST iNlER-RfOISTER 
/BETWEEN AC TO LR TO XR TO AC 
/ 



T8,5 JMS 
T8,6 

JMS 
PAX 
PXi. 
PLA 
SAO 
SKP 
JMP 
JMS 
/TEST 8|6 



REPEAT 

RANDOM 

RANB 



ER132 



H13Z 

DONE 
TEST INTER-RC5ISTER 
/BEWTEEN AC TO XR TO |.R TO AC 
/ 



T8,6 



ER133 



JMS 

T9,0 

JMS 

PAL 

PLX 

PXA 

SAD 

SKP 

JMP 

JMS 

.EJECT 



REPEAT 

RANUOM 

RANB 

H135 

DONE 



/CEt random NUMBER 

/PUT IN lR 

/GiT IT BACK 

/DID IT CHANGit 

/NO, CONTINUE 

/yC8, Error 

TRANSrCR or RANDOM NUMBERS 



/GET RANDOM NUMBER 
/pyT IN x« 
/GET IT BACK 
mo IT CHANOet 
/NO, CONTINUE 

/yCs, Error 

TRANSrCR or RANDOM NUMBERS 



/6lT RANDOM NUMBER 

/mOvc arduno 



/Dl.O IT CHANGE* 
/NO, CONTINUE 

/yEs, Error 

TRANSrtR or RANDOM NUMBERS 



/8tT RANDOM NUMBER 

/mOve around 



/DID IT CHANGE? 
/NO, CONTINUE 

/yEs, Error 



^9 



PAOe 81 



INOXiS 



IN0X15 



01545 


10400? 


01546 


001564 


01547 


145722 


01550 


205643 


21551 


721000 


01552 


213715 


01553 


543717 


01554 


741000 


01555 


605160 


01556 


2153720 


01557 


203728 


01560 


543717 


01561 


741000 


01562 


605162 


01563 


104023 


01564 


104000 


01565 


001603 


01566 


143722 


01567 


205644 


01570 


721000 


01571 


213721 


01572 


543717 


01573 


741100 


01574 


605164 


01575 


053724 


01576 


203722 


01577 


543717 


01600 


741000 


31601 


605166 


01602 


104023 



/TCST9»TEST DIRECT iNDExrO ADDRESSING 

/ 

/TEST9,0-.TCST LAC AND OAC INDEXED POSpivElY 

/ 



T9|0 



E»134 



CB135 



JMS 
T9,01 

DIM 
LAC 
PAX 
LAC 
SAO 
SKP 
JMP 
OAC 
LAC 
SAO 
SKP 
JMP 
JM5 



REPEAT 

PUT*2 
(2 

GETiX 

5S;T*2 

HIS* 
PUT»X 
PUT»2 
CCT*2 

H13S 
DONE 



/PLACE 2 IN INDEX REGISTER 

/CiT OONTlNTS OF GCT*2 

/SKIP ir NpT CONTENTS OF fiCT*2 

/GOOOi CONTlNyE 

/ERROR. INDEX 8IT 5 FAILED WITH LAC 

/DfPOSiT IN PUT*2 

/6lT CONTENTS Of PUT*2 

/5"1^ ir NOT CONTENTS OF GCT*2 

/E«ROR. INDEX BIT 5 FAILED WITH OAC 



/TEST 9,01"TE5T LAC AND DAC INDEXED NEGatIVELY 
/ 

REPEAT 



T9,0i 



ERi36 



ER137 



JHS 
T9,l 

DIM 
LAC 
PAX 

LAC 
SAD 
SKP 
JMP 
DAC 
LAC 
SAD 
SKP 
JMP 
JMS 
.CJECT 



PUT*2 
(-1 

GETMiX 
GET»2 

H13« 
PUT*4|X 
PyT*2 
GET*2 

H137 
DONE 



/PUT •» IN INDEX REGISTER 

/GET CONTENTS OF GET*f 

/SKIP Ir NOT CONTENTS OF CET*2 

/E«ROR| WRONG EFFECTIVE ADDRESS CALCULATED 
/OfPOSiT IN PUT«2 

/SKIP Ir NOT CONTENTS OF 6ET-2 

/ERRORi wRONO effective ADDRESS CALCULATED 



jD 



PACE 22 



Zi6ZZ 
01604 
01605 
01606 
01607 
01610 
01611 
01612 
01613 
01614 
01615 
01616 
0161T 
01620 
01621 
01622 
01623 
01624 



01625 

01626 
01627 
01630 
01631 
01632 
01633 
01634 
01639 
01636 
01637 
01640 
01641 
01642 
01643 
01644 
01645 
01646 



01647 
01650 

01651 
01692 
01653 
01654 
01655 
01656 
31657 
01660 
01661 



1N0X19 



104002 
>30i625 
205645 
721000 
750001 
043721 
153720 
203721 
740200 
605170 
205631 
251622 
545630 
741000 
605172 
741000 
252525 
104023 



104000 
001647 
205630 
721000 
750001 
343721 
153722 
203721 
740200 
605174 
205631 
251646 
545630 
741030 
605176 
741000 
252525 
104023 



104000 
001662 
205643 
721000 
113725 
605200 
205645 
721000 
613732 
605202 
104023 



IN0X15 
/TCST9,1-TEST XQR *Nd QIh INDEXED ^OIlTivCUy 
REPEAT 
(1 



T9,l 



ER140 



ER141 
k9,1 



JHS 
T9,ll 
LAC 
PAX 

cue 

OAC 
OIH 
LAC 
SiA 
JMP 
L*C 
XOR 
SAO 
SKP 
JMP 
SKP 
252525 



PUT*1 
PUTiX 
PUT*l 

H140 
(525252 
K9,i,X 
(777777 

H141 



DONE 



/'PliACE 1 IN XR 

/PliACE ALt ONES IN PUT*1 

/OiPOSlT iE«0 IN PUT*1 
/itJ CONTENTS or PUT*! 
/8«IP If IT 60T |C«OCO 
/iRRORi INDEX BIT 9 rAlLEO WITH DIM 

/XOB WITH eONTlNTS Of K9,l*l 
/E^RORi INDEX BIT 5 FAIUEO WITH XOR 



/TEST 9,ll«TEST XOR AND OZM INOEXEP NECaTIVClV 

/ 

T9,11 JM8 REPEAT 



JHS 
T9,2 
LAC 
PAX 

cue 

OAC 
DIM 
UAC 

su 

JMP 

UAC 

X0« 

SAD 

SKP 

JMP 

SKP 

252525 

JMJ DONE 
/TEST9,2»TE$T JMS AND JMP INDEXED 
/ 

REPEAT 



ER142 



Ef»l43 
k9,H 



(-1 



PUT*l 

PUT*2iX 

PUT*1 

H142 
{52>252 

K9,ll*2iX 
(777777 

H14? 



/PUACe 'l IN INDEX REGISTEP 

/PUACE ALU ONE IN PgT«l 

/DEPOSIT 2IH0 IN PUT»1 

/8KI^ ir ^UT*1 GUCARED 

/|RRO«i WRONG ErPtCTIVC ADDRESS CAUCUU*TEO 

/XOR WITW CONTENTS Of K9.11*l 

/ERRORi wRONG EfFCCTlVE ADDRESS CAUCUUATEO 



T9,2 



ER144 



ER145 



JMS 
T9,3 

UAC 
PAX 

JMS 
JMP 
UAC 
PAX 

JMP 

JMP 
JMS 
.EJECT 



(2 

suai.x 

Ht44 
(1 

H14» 
DONE 



/PUACE 2 IN XR 

/JMS TO swains 

/ERROR. INDEX BIT 9 PAIUEO WITH jMS 
/PUACE 1 In xR 

/JMP SVB2*1 

/ERRORi INDEX BIT 5 FAIUED WITH JMS 



3/ 



PACE 23 


INOXiJ 


IN0X15 










/TEST* 

/ 

T9,3 


,3-TEST 


SAD AND XCt 


01662 


104000 


JM$ 


REPEAT 


01663 


001703 




T9,4 




01664 


736000 




CLLR 




01665 


205643 




LAC 


(2 


01666 


721000 




PAX 




01667 


203717 




LAC 


GIT*2 


01670 


553715 




SAO 


GETiX 


01671 


741000 




SKP 




01672 


605204 


£R146 


JMP 


H146 


01673 


205645 




LAC 


(1 


01674 


721000 




PAX 




01675 


413734 




XCT 


$LI93tX 


01676 


605206 


ER147 


JMP 


H147 


01677 


104023 




JNI 


OONE 






/TEST?; 


,4«TEST 


REMAINDER nf 






/INDEXED ADD, TAD, 18Z, AND 


01700 


104000 


T9,4 


JN$ 


REPEAT 


01701 


001732 




T9,5 




01702 


143720 




DIM 


PUT 


01703 


143722 




OiH 


PUT*2 


01704 


205649 




LAC 


(1 


01705 


721000 




PAX 




01706 


750000 




CLA 




01707 


313736 




ADO 


TOTE,X 


01710 


543737 




SAO 


T0TE*1 


01711 


741000 




SKP 




01712 


605210 


ER150 


JHP 


H150 


01713 


737001 




AXR*1 




01714 


353736 




TAD 


TOTI.X 


01715 


545646 




SAO 


(770 


01716 


741000 




SKP 




01717 


605212 


ER151 


JMP 


H151 


01720 


453720 




181 


PJTiX 


01721 


203722 




LAC 


PUT*2 


01722 


545649 




SAO 


(1 


01723 


741000 




SKP 




01724 


605214 


ERi52 


JMP 


H192 


01725 


513720 




AND 


PUTiX 


01726 


545645 




SAD 


(1 


01727 


741000 




SKP 




01730 


609216 


ER15S 


JMP 


H153 


01731 


104023 




JMS 
.EJECT 


DONE 



INDEXED 



/CLEAR 1.1MIT REGISTER 
/^UACE 2 In xR 

/GiT CONTENTS Of GCT*2 



/CRRORi INDEX BIT 9 fAlLEO WITH SAO 
/PLACE 1 IN XR 



/|RRORi iNOtX 81T 9 PAlLEO HlTM XCT 
MEMORY RErERENCE INSTRUCTIONS 

/lERO AREA roR tSI TEST 

/PLACE 1 IN XR 

/OLEAR AC AND ADD TQTE^l 



/€"f^ORi aOO INDEXED FAILED 
/AOO 1 TO XR 



/ERRORi tab INDEXED FAILED 
/IH PUt*2 



/CROR. I$| INDEXED rAJLEO 
/AND AC WITH PUT*2 



/ERROi AND INDEXED TAILED 



Pkdl 24 



01732 
0i733 
01734 
01739 
01736 
01737 
01740 

ei74i 

01742 
01743 
01744 
01745 
01746 
01747 
01750 
01T51 
01752 
01753 
01754 
01795 



01756 
01757 
01760 
01761 
01762 
01763 
01764 
01765 

01766 
01767 
01770 
01771 

01772 
01773 
01774 
01775 
01776 
01777 
02000 
02001 



IN0X15 



104000 
i?01756 
209647 
040021 
205650 
040022 
205651 
040023 
205645 
721000 

000000 

741000 
609220 
205652 
721000 
205653 
040020 
030000 
609222 
104023 



104000 
?02002 
14S747 
203715 
740051 
343746 
721000 
750000 
233715 
543746 
741000 
609224 
737001 
203715 
073715 
203747 
543715 
741003 
605226 
104023 



INDX15 
/TtST9,9.TEST THAT Ca|. AvO CAL» INOEXEO OO NQT INiOEX 



T9,5 



CR194 



ER195 



JMS 

T10,0 

LAC 

OAC 

LAC 

DAC 

LAC 

OAC 

LAC 

PAX 

CAL 

SKP 

JMP 

LAC 

PAX 

LAC 

DAC 

CAL* 

JMP 

JMS 



REPtAT 

(JMP» 20 

21 

(JS2 21 
22 

(JMP« 21 

23 

(1 

0iX 

H154 
«3 

(5UB4 

20 

0|X 

Hl?5 

DONE 



/iNlTUuIiC RCTURN 



/Tl'V TO CAL INDEXED 

/Cf^RORi CAL INQCXCO WQItKEO 
/PLACE 3 IN XR 



/ERROR, cAL* INDEXED WORKED 



/TESne-TEST INDIRECT INDEXED ADDRESSING 

/TEST1»,0-TEST LAC» AND OAC* JNDExED 

/ 

Tie,0 JMS REPEAT 

Tl0,l 

DIM ICET*1 

LAC GET 

CNAJIAC 



ER160 



ER161 



TAD 
PAX 
CLA 

LAC* 

SAO 

SKP 

JMP 

AXR*l 

wAC 

DAC* 

LAC 

SAD 

SKP 

JMP 

JMS 

.EJECT 



IGET 



6ET»X 

IGET 

H16B 

GET 

GETiX 

IGET»1 

GET 

M161 

DONE 



/CALCUIatE and save address OlfFERENCE 
/BETWEEN CET AND 16ET 

/GET CONTENTS Of JSET 
/ERROR» LAC* INDEXED FAILED 



/DEPOSIT AT IQET»1 

/GET RESULTS OF GET OPERATION 



-Z3 



PAGE 29 


INDX19 


IN0X19 














/TESTie 

/ 

Tlk5,l 


l.l'TEST 


JMP* ANO 


JMS* 


IMOEXfO 


f2002 


104000 


JM8 


REPEAT 






02003 


?02017 




710.2 








02004 


205654 




LAC 


(JMP ER162 


/INITIALI?C E«ROR RETUPN 


02009 


043721 




OAC 


PUT*i 






02006 


205659 




LAC 


{9 




/PWACC 9 IN XR 


02007 


721000 




PAX 








02010 


133750 




JMS« 


jaiT,x 




/jM$ TO suei«2 


02011 

02012 


609230 
209649 


E«162 


JMP 
LAC 


H162 
<1 




/|«R0«» JMS« INOtXCO TAILED 


02013 


721000 




PAX 








02014 


633791 




JMP* 


JSUB?|X 






02019 


609232 


eR163 


JMP 


H163 




/fPOHi JMP# INDEXED fAlLEO 


02016 


104023 




JMS 


DONE 










/TCST10 

/ 
T10,2 


,2. TEST 


SAO» ANO 


XC7* 


INOCXIO 


02017 


104000 


JMS 


RCPSAT 






02020 


002034 




Ti0,3 








02021 


209643 




LAC 


(2 




/PLACE 2 In xR 


02022 


721000 




PAX 








02023 


203717 




LAC 


SCT*2 




/PUT OUanTITY 6ET*I in AC 


02024 
02029 


973794 
741000 




SAO* 
8KP 


S6CT.X 




/CHECK ir 8A0 INDIRECT iNOtl 


02026 

02027 


609234 

433799 


em64 


JMP 
XCT* 


Hl#4 
SeCTXtX 




/EHRORi SA0» INDEXED fAlLEO 


02030 


943715 




SAD 


GET' 






02031 


741000 




SKP 








02032 
02033 


609236 

104023 


E«165 


JHP 
JMS 
.EJECT 


H165 
DONE 




/ERROBi xCTt INDEXED TAILED 



J 



Y 



PAOe 26 



IN0X15 



IN0X15 



02061 


104313 


02062 


104000 


02063 


302105 


02064 


203760 


02069 


040010 


02066 


209645 


02067 


721000 


02070 


230010 


02071 


543762 


02072 


741000 


02073 


609242 


02074 


205657 


02075 


040010 


02076 


209631 


02077 


070010 


^^l^e 


203765 


02101 


949631 


02102 


741000 


02103 


605244 


02104 


104023 



/TEST 10.3 TEST LAC»A(X UHCRE A fS AN iNCf^EASlNfi f>OSITIVC VALUC 
/TO MAX OF 77777 AN X IS AN INCI»E*SIN8 •jESATJVE VA|.gE 80 THAT 
/AV EfFECTIVC ADDRESS OF IS ALWAYS CALCULATED 
/ 



/CWEAR VARIABLE STQRAGE^XR 
/SCT CONSTANT IN LOC Z 
/AOORCSS IOC 



/LOC NO? AODRCSSCOI ir fAILUKC 
/PLACE JHP r«9 IN CR1«« TO SEC 

/LOOP AND INSURE LOOP IS NOT tNCRCMENTCO 
/ENOi YET 
/YfSi IXIT 

/nOi save 



02034 


10432? 


T13,3 


JM$ 


INIT10 


08039 


104000 




JMS 


REPEAT 


02036 


002061 




Tll,0 




02037 


142057 




DIM 


Vl0i3 


02040 


739000 




CLX 




02041 


209631 




LAC 


(929292 


02042 


040000 




OAC 





02043 


232057 


L12,3 


LAC* 


V10i3|X 


02044 


545631 




SAO 


(925252 


02049 


741000 




SKP 




02046 


609240 


eR166 


JMP 


H166 


02047 


202057 




LAC 


V10i3 


02090 


740030 




lAC 




02051 


945696 




SAO 


(100000 


02052 


602060 




JHP 


Vl0.3«l 


02053 


^42097 




OAC 


viai3 


02094 


740031 




CMAIIAC 




02059 


721000 




PAX 




02096 


602043 




JMP 


Ll0i3 


02097 


000000 


V10,3 







02060 


104023 




JHS 


DONE 



/PUT COMPLlNtNT IN XR 



/TEST11-TE8T INDIRECT INDEX AUTO INCREMENTED ADDRESSING 

/ 

/TEST11.0-TEST LAC* 10iOACt 10 

/ 



T11.0 



ER170 



ER171 



JM8 


initn 


JMS 


REPEAT 


Til, I 




LAC 


DATA 


DAC 


10 


LAC 


(1 


PAX 




LAC* 


10|X 


SAD 


0ATA*2 


SKP 




JMP 


HI?? 


LAC 


(STORE 


DAC 


10 


LAC 


(92»252 


DAC* 


10|X 


LAC 


ST0RE*2 


SAO 


(526252 


SKP 




JMP 


H171 


JM8 


DONE 


.EJECT 





/RESTORE NORMAL LOOP COUNT 

/iNlTlALilE 10 

/PUT I IN XH 

/LOAD GET^I into AC 

/Ef'RORi 

/DEPOSIT IN PUT*2 
/ERROR 



ss^ 



PACE 27 



IN0X15 



IN0X15 



?2105 
92126 
?E107 
22110 

esiii 

02112 

?2ll3 
02114 
«2115 
02116 

e2ii7 

0212? 
02121 
02122 
?2123 
?2124 
02125 



02126 

02127 
02130 
02131 
("2132 
02133 
02134 
02135 
02136 
02137 
02140 
02141 
02142 



02143 
212144 
02145 
02146 
02147 
02150 
02151 
02152 
?!2153 
22154 
02159 
02156 



104000 

302126 
209605 
721000 
203762 
040011 
203762 
570011 
741000 
605246 
750000 
737004 
430011 
543762 
741000 
605290 
104023 



104000 
002143 
205645 
721000 
203770 
040017 
630017 
605252 
737001 
440017 
130017 
605254 
104023 



104000 
002157 
750000 
723002 
721000 
707764 
707762 
213715 
543717 
74100? 
605256 
104023 



/T|:STll,l»TEST 

/ 

Tll.l J^'S 

Til, 2 

LAC 

PAX 

lAC 

OAC 

LAC 

SAD* 

SKP 

ER172 JMP 
CUA 
AXII«4 
XCT* 
SAD 
SKP 

ER173 JMP 
JMS 

/TESTH,2«TCST 

/ 

T1J,2 



SAD» ll.XCT* 11 
REPt.AT 
(1 

DATA 
11 

0ATA*2 
11|X 

H172 



DATA*2 



/PUT A ONE IK; INDEX REGISTER 

/PUT ADDRESS or LOC DaTa IN AUTO INDEX 

/GtT CONTENTS OF 0ATA*2 AND COMPARE 
/WITH Sel*" via AUTO INDEX INDEXED 



/AOO 4 TO XR 

/XCT LOCATION JXCT 



JHS 

Til, 3 

LAC 

PAX 

LAC 

DAC 

JMP» 
ER174 JMP 

AXR*1 

ISt 

JHS» 
ER175 JMP 

JMS 
/TEST 11,3 .. TE 



H173 
DONE 
JMP» 17iJmS« 17 INDEXED 

REPEAT 
(1 



/ 

Til, 3 



ER176 



JMS 

T12,0 

CLA 

AAC*2 

PAX 

EBA 

EPA 

LAC 

SAD 

SKP 

JMP 

JMS 

.EJECT 



JSUB3 
17 
17, X 

Hi74 

17 

17, X 
H17S 
DONE 
ST t*C*XR AFTER 

REPEAT 



GCT»X 
C£T*2 

H176 

DONE 



/PUT ADDRESS JSUB3»1 IN L0C,l7 
/JMP TO jSUBS* 

/AOD I TO XR, NEW TOTAl. 2 

/ADD 1 TO 17 TO MAKE IT JSUB3*3 



MODE CHANGE 



/PUACE quantity 2 INXR 
/TOGGLE MODE 

/USE INDEXED ADDRESSING 



^ ^ 



PAGE 2B 



IN0X15 



1^0X15 



02157 

02160 
02161 
02162 
02163 
02164 
02169 
02166 
02167 
02170 
02171 
02172 
02173 
02174 
02175 
02176 
02177 
02200 
02201 
02202 
02203 
02204 
0220S 
02206 
02207 
02210 
02211 
02212 



104000 
002213 
404166 
602536 
205660 
047000 
204196 
344201 
721000 
760000 
344203 
044204 
357000 
217003 
944204 
741000 
609260 
204196 
344201 
721000 
204156 
345661 
044216 
234216 
544204 
741000 
609262 
104023 



/TEST 12 • TEST 

/IN All BLOCkSi 

/TEST XCT TO Fl, 

/ 

/TEST 12,0-TEST 

/ 



T12,0 



ER200 



ER201 



JMS 

T12.1 

XCT 

JMP 

UAC 

DAC 

LAC 

TAD 

PAX 

tAW 

TAD 

OAC 

DAC 

LAC 

SAD 

SKP 

LAC 
TAD 
PAX 

I.AC 

TAD 

OAC 

LAC* 

SAO 

SKI» 

JMP 

JMS 

.EJECT 



FOR INDEXED lAC, OAC ACccSS TO ALL TIELOS 

ONE BLOCK AT A TIME 

r3|F5|r7 AND LAC* TO F0,F2|r4,F6 INDEXED 

ACCESS TO FIELD 

REPEAT 



TCPk) 

T13,0l 

(NO** 

TSTUOC 

P0A 

BLOCK 



9LXC0N 

TEMKON 

TSTLOCiX 

TSTUOCiX 

TgMKON 

H200 

P0A 

BLOCK 

r0A 

(7000 
POINTI 
POINT!, X 

TEHKON 

H201 
DONE 



/DOES THIS TEST EXIST? 

/nOn-EX mExi, go to NEXT CROUP OF TEStS 

/PLACE NIO^ IN TEST LOC IN r0,80 

/place pc 91ts ror f0 in xr 
/aoo block sits 

/DIROSIT LAM 



/CITHER LAC OR OAC TO F0 FAILED 



/lac»,x to tstloc to F0 failed 



?P 



fkdt 29 



INDXIS 



1N0X15 



32213 

32214 

^221S 

02216 

0221? 

02223 

02221 

02222 

32223 

02224 

02229 

02226 

02227 

02230 

02231 

02232 

02233 

02234 

0223S 

02236 

02237 

02240 

02241 

02242 

02243 

02244 

02249 

02246 



I0400e 

022247 
404167 
602936 
760000 
047000 
204157 
344201 
721000 
760001 
344203 
044204 
057000 
207000 
949662 
741000 
609264 
2l700e 
544204 
741000 
609266 
750000 
417000 
544204 
741000 
609270 
103416 
104023 



/TEST 12.1 
/ 



T12.1 



£0202 



CR203 



ER204 



JMS 

Tl?,2 

XCT 

JMP 

LAW 

DAC 

L*C 

TAO 

PAX 

LAW 

TAD 

DAq 

DAC 
LAC 
SAO 
SKP 

JMP 

LAC 
SAD 
SKP 
JMP 
CLA 
XCT 
SAD 
SKP 
JMP 
JM5 
JMS 
.EJECT 



'EST ACCESS 
REPEAT 

TEFl 
T13.01 

TSTLOC 

riA 

SLOCK 

1 

BLKCON 

TCMKON 

TSTLOCiX 

TSTLOC 

(LAW 

H202 

TSTLOCiX 

TIMKON 

H203 

TSTLOCiX 

TEMKON 

H204 

TEStra 

DONE 



TO riELO I 



/DOES This riELO EXIST? 

/NOn-EX wEm, go to next group of TESTS 

/PLACE LAW IM TEST LOG IN ft 

/PLACE PC BITS rOR n IN XR 
/ADD BLOCK BITS 

/DEPOSIT LAW I IN TEST ♦ CONSTANT 



/LOCATION OF Fl 
/L*C TEST LOC IN F0 



/E^RORi DAC OCCURRED IN F0 
/LAC TEST LOC IN Fl 

/EfROR, CITHER LAC OR DAC TO Fl FAILED 
/XCT TEST LOC IN Fl 



/Ef^RORi XCT INDEXED TO Fl FAILED 
/TEST Ir LOC IN F0 MODIFIED 



- Z' 



P»A6E 50 


IN0X15 


IVOUS 










/TEST 


12,2 . TEST ACCESS TO 


02247 


104000 


Tl2,2 


JMS 


REPEAT 


02250 


0023ie 




T12,3 




02251 


404170 




XCT 


TEfZ 


02252 


602536 




JMP 


T13,01 


02293 


760000 




L*U 





?I2254 


047000 




DAC 


TSTLOC 


02255 


204160 




LAC 


r2A 


e!2256 


344201 




TAD 


BLOCK 


02257 


721000 




PAX 




02260 


760002 




LAW 


2 


02261 


344203 




TAD 


8LKC0N 


02262 


044204 




DAC 


TEMKON 


02263 


057000 




OAC 


TSTUOCiX 


02264 


207000 




LAC 


TSTLOC 


e2269 


545662 




SAO 


(LAW 


02266 


741000 




SKP 




02267 


605272 


ER205 


JMP 


H20» 


02270 


217000 




LAC 


TSTLOCiX 


02271 


544204 




SAD 


TEMKON 


02272 


741000 




SKP 




02273 


605272 


ER206 


JMP 


H205 


02274 


204157 




LAC 


ru 


02275 


344201 




TAD 


BLOCK 


02276 


721000 




PAX 




02277 


204157 




LAC 


riA 


02300 


345661 




TAO 


(7000 


02301 


044216 




DAC 


POINTI 


02302 


234216 




LAC* 


POINTliX 


02303 


544204 




SAO 


TEMKON 


02304 


741000 




SKP 




0230S 


609276 


ER2a7 


JMP 


H207 


02306 


103401 




JMS 


TESTFl 


02307 


104023 




JMS 
.EJECT 


DONE 



FIELD 2 



/DOES This riELD existt 

/nOn-CX mEm, CO TO NEXT GROUP OF TESTS 



/PUACE PC BITS FOR F2 IN XR 
/ADO BLOCK BITS 



/OAC IN TEST LOCATION OF r2 
/5ET TEST LOC IN F0 



/ERRORi OAC OCCURRED IN r0 
/GET TEST LOC IN F2 



/ERROR. lAC OR OAC INOEXCO TO F2 FAILED 



/ERROR, lAC« indexed TO LOG TO F2 FAILED 
/TEST IF UOC IN Fl MODIFIED 



PACE 31 


INOXl 


02313 


i040ee 


02311 


C02344 


02312 


404171 


02313 


602536 


02314 


760000 


02315 


047000 


08316 


204161 


02317 


344201 


02320 


721000 


02321 


760003 


02322 


344203 


02323 


044204 


02324 


057000 


02325 


2070B0 


02326 


545662 


02327 


741000 


B2330 


605300 


02331 


217000 


02332 


544204 


02333 


741000 


02334 


605302 


02335 


750000 


02336 


417000 


02337 


544204 


02340 


741000 


02341 


605304 


02342 


103364 


02343 


104023 



INDX15 

/TEST 12,3 - TEST ACCESS TO riELD i 
/ 

T12.3 JMS REPEAT 
T12,4 

XCT TETJ /OOES ThiS riELO EXIST? 

JMP T13,0l /NO, NOn«EX mEH, go TO NEXT TEST 

LAW 

□AC TSTtOC 

LAC r3A /PLACE PC BITS TOR TS IN XR 

TAD BLOCK /ADD BLOCK BITS 

PAX 

LAW 3 

TAO 3LKC0N 

OAC TCMKoN 

OAC tstlocx /oac in test loc in r3 

LAC TSTLOC /TEST LOC IN ^0 

SAD (LAW 

SKP 

E«2ie JMP H210 /E^ROR, DAC OCClJRRtO IN r0 

LAC TSTLOC, X /CtT CONTENTS OF TEST LOC JN rS 

SAD TEMKON 

SKP 

ER211 JMP H2il /CfROR, lAC OR DAC INDEXED INTO fl FAILED 

CLA 

XCT TSTLOCiX /XcT TEST LOC IN pS 

SAO TEMKON 

SKP 

ER212 JMP H212 /E«ROR, XCT INDEXED TO F3 FAILED 

JMS TESTF2 /TEST IF LOC IN F8,Fl MODIFIED 

JMS DONE 

.EJECT 
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INDX15 



IN0X15 



/TEST 12.6 
/ 



TE 



02441 

02442 

02443 

02444 

02445 

02446 

02447 

02450 

02451 

02452 

02453 

02454 

02459 

02456 

02457 

02460 

02461 

02462 

02463 

02464 

02465 

02466 

02467 

02470 

02471 

02472 

02473 

02474 

02475 

02476 

02477 

02500 

02501 



104000 

■302502 

404174 

602536 

760000 

047000 

204164 

344201 

721000 

760006 

344203 

344204 

057000 

207000 

545662 

741000 

609322 

217000 

544204 

741000 

609324 

204161 

344201 

721000 

204161 

345661 

044216 

234216 

544204 

741000 

609326 

103315 

104023 



T12.6 



ER221 



E:R222 



ER223 



JMS 

T12,7 

XCT 

JMP 

LAM 

OAC 

LAC 

TAD 

PAX 

LAW 

TAO 

OAC 

DAC 

LAC 

SAO 

SKP 

JMP 

LAC 

SAO 

SKP 

JMP 

LAC 

TAD 

PAX 

LAC 

TAO 

OAC 

LAC* 

SAD 

SKP 

jMp 

JMS 

JHS 

.EJECT 



ST ACCESS TO FIELD 6 
REPEAT 



TEFft 
T13,01 



TSTLOC 

F6A 

BLOCK 

6 

BLKCON 

TEMKQN 

TSTLOCiX 

TSTLOC 

(LAW 

H22L 

TSTLOC, X 
TEMKON 

M222 
F3A 

BLOCK 

F3A 

(70(ii0 

POINTI 

POINTliX 

TEMKON 

H223 

TESTF5 

OONE 



/DOES This field EXIST? 
/mO, (JO TO MEXT TEST 



/YES, Place pc bits for f6 in xr 

/ADD BLOCK BITS 



/OAC IM TEST LOC IN F6 
/TEST LOC IN F0 



/E«RORi DAC OCCURRED IN F0 

/GET CONTENTS OF TEST LOC IN F6 



/E^ROR, LAC OR OAC IMOEXEO TO F6 FAIlEO 



/E^RORi XCT INDEXED TO F6 FAILED 

/TEST IF LOC IN F9,F4,r3,F2,Fl MODIFIED 
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IMOXl 


JfZSl!!? 


10400? 


02503 


C102536 


5^2504 


404175 


?2505 


«02536 


02506 


76000? 


02507 


04^000 


02510 


204165 


02511 


344201 


02512 


721000 


02513 


760007 


32514 


344203 


02515 


344204 


^2516 


057000 


02517 


207000 


02520 


545662 


02521 


741000 


02522 


605332 


02523 


217000 


02524 


544204 


02525 


741000 


02526 


605332 


02527 


750000 


02530 


417000 


^2531 


544204 


02532 


741000 


?2533 


605334 


02534 


103300 


02535 


104023 



INDX15 

/TEST 

/ 

T12,7 



12,7 - TEST ACCESS TO FIELD ^ 



ER224 



E«225 



E«226 



JMS 

T13,?l 
XCT 

JMP 

LAW 
DAC 
LAC 
TAO 
PAX 
LAW 
TAD 
OAC 
OAC 
LAC 
SAD 
SKP 
JMP 
LAC 
SAD 
SKP 
JMP 

CLA 
XCT 
SA-0 
SKP 
JMP 
JMS 
JMS 
.EJECT 



REPEAT 

TEP? 
T13,01 
Z 
TSTLOC 

r7A 

BLOCK 

7 

BLKCON 

TEMKON 

TSTLOCiX 

TSTLCC 

(LAW 

H22< 

TSTLOC.X 

TEMKON 

h22» 

TSTLOCiX 

TEMKON 

M226 

TESfr6 

DONE 



/DOES This field exist? 
/nOi go tO next test 



/yESi Place pc bits fop f7 in xh 
/aoo block bits 



/OAC in test LOC in F7 
/TEST LOC IN r0 



/ERRORi OAC OCCURf'EO IN F0 

/GET CONTENTS OF TEST LOC IN F7 



/£RRORi LAC OR DAC INDEXED TO F7 FAILED 
/XCT TEST LOCATION IN F7 



/CRROR» xCT INDEXED TO F7 FAILED 

/TEST If LOC IN F6iF5,F4,F3,F2,Fi MODIFIED 



PACE 36 



1N0X15 



INDXIS 



l?2536 
02537 
32540 
?2541 
:?2542 
02543 
02544 
32545 
02546 
P2547 
0255?" 
02551 
02552 
02553 
02554 
02555 
02556 
02557 
02560 



02561 
02562 
02563 
02564 
02565 
02566 
02567 
02570 
02571 
02572 
02573 
02574 
02575 



02576 
02577 

0260? 
?260i 
02602 
02603 
02604 
02605 
?2606 
02607 

r26ir 

02611 



144211 
204202 
741200 

602612 
10400'? 
002961 
404166 
603435 
104364 
204196 
344231 
103502 
760001 
344233 
103665 
117000 
605336 
605340 
104023 



104000 
002576 
204156 
344201 
103514 
760002 
344203 
103665 
117000 
605342 
605344 
605346 
104023 



104000 
002612 
204156 
3442P1 
103526 
760003 
344203 
103665 
117000 
605350 
605352 
104023 



/ 

/TEST 

/AND T 

/ 

/TEST 

/ 

T1«J,01 



13 • REIOCATC TEST 
RA^lSfER CONTBOt TO 



PROSSAM 1^ UPPER MEhORY PAGE IF IT EXISTS 
TMIS PROGRAM To VERIFY INDEXED OPERATION 



13,01 - TEST fi: FOi; LAC*DAC» AUTO INDEX INDEXED TO F0 



ER227 
ER230 

/TEST 

/ 

T13,02 



ER231 
ER232 

ER233 

/TEST 
/ 

T13,03 



ER234 
ER235 



L*C 

SNA 
JMP 
JMS 

Ti3,a2 

kCT 

JMP 

J^'5 
LAC 
TAD 
JMS 
LAW 
TAD 
JMS 
JMS 
JMP 
JMP 
JMS 

13.02 ^ 

JMS 

T13,03 

LAC 

TAD 

JHS 

LAW 

TAD 

JMS 

JMS 
JMP 
JMP 
JMP 
JMS 

13.03 - 

JMS 
T13,11 

LAC 

TAD 
JMS 
LAW 
TAO 
JMS 
JMS 
JMP 
JMP 
JMS 
.EJECT 



COJNT 
BLKNQ 

Tl3ill 
REPEAT 

TEfia 

TSTOP 

2ERMEM 

r0A 

BLOCK 

MOVEl 

1 

BLXCoN 

MlNlT 

TSTLCC.X 

W22; 

M230 
DONt 
EST F? FOR 

REPEAT 



F0A 
BLOCK 
M0VE2 
2 

BLKCON 
MJMT 
TSTLOCiX 
H23X 
H232 
H233 
DONE 
TEST Fg FOR 

REPEAT 

F0A 
BLOCK 
MQVLS 
3 

BLKCON 

H I M I T 
TSTLOCX 
H234 
h235 

DONE 



/ARE WE TESTIN6 BLOCK 07 
/NO, PERFORM THESE TESTS 
/YES, SkP these tests 



/ZERO All memory except f0 once 

/GET ADDRESS OF BLOCK ♦ FIELD 

/YES, Move test program to this field 

/TEST CO^'STANT 

/INITIAL12K CONSTANTS 

/XCT TEST PROGRAM IN RCSjOENT FIELD 
/L*C« AutO index indexed TO F0 FAILED 

/oAc* Auto index indexed to f0 failed 

LACiDAC|SAD AND JMS INDEXED IN RESIDENT FJELD 
/CAL FROM HERE INDICATES JMS^XR FAILED 



/YES, Move test program to this field 
/TiST Constant 

/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/LAC INDEXED l^ RESIDENT FIELD FAILED 
/OAC INDEXED IN RESIDENT FIELD FAILED 
/SAO INDEXED IN RESIDENT FIELD FAILED 

OAC AND TAO Indexed to F0 



/yES, HovE TEST PROGRAM TO THIS FIELD 
/TEST CONSTANT 

/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/OAC INDEXED TO F0 FAILED 
/TAD INDEXED TO re FAILED 
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INOXl! 


Z2612 


144211 


132613 


1040{>0 


02614 


Ce2632 


02615 


404167 


02616 


603435 


02617 


104364 


0262?! 


?04157 


J52621 


344201 


02622 


103502 


02623 


760101 


02624 


344203 


02629 


103665 


02626 


11T000 


02627 


605354 


e2«37i 


609396 


02631 


104023 


02632 


104000 


02633 


002651 


02634 


404167 


02639 


603435 


02636 


204157 


02637 


344201 


Z264P 


103514 


02641 


760102 


02642 


344203 


02643 


103665 


02644 


117000 


?2645 


605360 


02646 


605362 


02647 


605364 


02693 


104023 


02651 


104000 


02692 


?02667 


02653 


404167 


02694 


603435 


0Z659 


204157 


02696 


344201 


02697 


103526 


0266? 


763103 


!'266l 


344203 


02662 


103665 


."2663 


11700;^ 


.^2664 


A05366 


02665 


62537.1 


.^2666 


104023 



INDX15 
/TEST 13.11 
Tl3,ll D2M 

JMS 

T13,12 

XCT 
JMP 
JHS 
LAC 
TAD 

JMS 

L»w 
TAO 
JHS 
JMS 

ER236 JMP 

ER237 JMP 
JMS 

/TEST 13,12 - 

/ 



TEST fX rOR LAC»OAC» AUTO INDEX INDEXED TO r0 



COU'^T 
REPEAT 



/DOES This field exist? 

/NO, CO TO NEXT GROUP OF TESTS 
/iERO ALL MEMORY EXCEPT r0 ONCE 
/GET ADDRESS OF BLOCK * FIELD 



TEFl 
TSTOP 
HERMEM 
FIA 
BLOCK 
MOVEl 
101 

SLKCON 
MlNlT 
TSTLCC,X 
H236 
H237 
DONE 
TEST Fi FOR LACiDAC.SaD AND JMS INDEXED IN RESIDENT FIELD 



/rtSi MOVE TEST PROGRAM TO THIS FIELD 
/TEST C0V$TAN:T 

/PITIALliit CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/L*C» AyTO 1K:DEX INDEXED TO ft FAILED 

/D*c» Auto index inqexcd to f0 failed 



T15.12 



JMS 

T13,13 
XCT 



REPEAT 



/C*L FRO^ HERE INDICATES JmS»XR FAILED 



TEFl 
TSTOP 

Fl* 

BLOCK 

M0VE2 

102 

8LKC0N 

MJNIT 

TSTUOCiX 

H24i9 

H241 

H242 

DONE 
/TEST 13,13 * TEST Fi FOR OAC AND TAD INDEXED 
/ 

REPEAT 



ER240 
ER241 
ER242 



JMP 

LAC 
TAO 
JMS 
LAW 
TAD 
JMS 
JMS 
JMP 
JMP 
JMP 
JMS 



/DOES Thi5 field EXIST? 

/NO, GO TO NEXT GROUP OF TESTS 



/ytS, MOVE TEST PROGRAM to TmIS FIELD 

/fEST Constant 



/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM 



/LAC 
/DAC 
/SAO 



INDEXED 
INDEXED 
INDEXED 



IN RESIDENT 
IN RESIDENT FIELD FAILED 
IN RESIDENT FIELD FAILED 
IN RESI'^E'^T FIELD FAlLEr} 

TO F0 



FIFuJ 



T13.13 



E«243 
ER;J44 



JMS 

T13,21 

XCT 

JMP 

LAC 

TAD 

JMS 

LAW 
TAD 
JMS 
JMS 

jMP 

JMP 

jMS 

.EJECT 



TEFl 
TSTOP 
FIA 
BLOCK 

■iOvta 

103 

BLKCcN 

MiNiT 

TSTLCCX 

H243 

W244 

DONE 



/Dtss This field exist? 

/NO. CO TO NEXT GROUP OF TESTS 



/YES, HovE TEST PrOQRAm tO TwIS fJELO 
/TEST CONSTANT 



^'INITIALIZE CONSTANTS 

/XCT TEST PR0CR4" 

/QAc inqexe:^ to r? faile: 

/TAD INqeXCD to r? FAlLEr 



IN RESJDEM fir.- 
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/TEST 13,21 r. TEST f2 fQR LAC^QAC* AUTO JNDCX iNOCXEn TO F? 

/ 

32667 l?402i3 T13.21 JMS PEPtAT 

^2675! 102736 T13,22 

32671 42417C XCT TEP2 /qOES ThiS riE|,0 E^ISTt 

^2672 603435 JMP TSTOP /nO, 50 TO NEXT GROUP OF TESTS 

02673 104364 JMS lZ^<*t^ /ZERO All MEmQBY EXCEPT r0 QMCE 

02674 20416a L*C fJA 
Z2675 344231 TAD BLOCK 

02676 1B3502 JMS mOVE-I /yESi MOvE TEST PROGRAM TO THIS FIELD 

02677 763201 LAW 201 /TEST Co»vjSTAMT 
2270S» 344203 TAD BLKCON 

02781 103665 JMS HINiT /t^ITIALlEE CONSTANTS 

02702 117000 JHS TSTLOCiX /XcT TEST PROGRAM IN RESIDENT riELO 

32703 605372 ER245 JMP H245 /L*C» AutO INDEX IN^OEXEO TO r0 TaILEP 

02704 605374 ER246 JMP H246 /D*C« AutO JVDEX INDEXED TO F0 FAILED 

02705 104023 JMS DONL 

/TEST 13,22 - TEST F? FOR LACiDAC,SaO AnO JMS INDEXED IN RESIDENT FIELD 
/ 

02706 104003 T13,22 JMS REPEAT /qAL FRov HERE INDICATES JMS*XR FAILED 

02707 ?02725 Tl3,23 

32710 404170 XGT TEF2 /qOES ThiS FIELD EXIST? 

02711 603435 JMP TSTOP /NO, GO TO NEXT GROUP OF TESTS 

32712 204160 LAC F2A 

02713 3442!?1 TAD BLOCK 

?'2714 103514 JMS M0VE2 /YES, MqvE TEST PROGRAM TO THIS FIELD 

02715 760202 L^W 202 /TEST CqnSTANT 

:?2716 344203 TAD SL^CON 

22717 1B3665 JMS M I \ I T /INITIALIZE CONSTANTS 

32720 117000 JM5 TSTLOCX /XCT TEST PROGRAM IN RESIDENT FIELD 

02721 605376 ER253 JMP u250 /l^C INDFXEO IN RESIDENT FIELD FAILED 

02722 605400 ER251 JMP ^231 /0*C INDEXED IN RESIDENT FIELD FAILED 

02723 605432 ER252 JMP -i252 /S^O INDEXED I^ RESIDENT FIELD FAILED 

02724 104023 J^S 30ME 

/TEST 13,23 - TEST ^"2 FOR 3AC AND TAD INDExED TO F0 
/ 

02725 104303 T13.23 JMS REPEAT 

02726 002743 Tl3,31 

02727 404173 XCT TEF2 /DOES ThiS FIELD EXISTT 

02730 603435 JMP TSTOP /NO, GO TO NEXT GROUP OF TESTS 

02731 204160 LAC r2A 

02732 3442D1 TAD 5LCCi< 

02733 103526 jMS mOvES /yES, MqvE TEST PROGRAM TO THIS FIELD 

02734 760203 LAW 203 /TEST Co^STA^'T 
02739 34*2?3 TAD 5L<tc\ 

02736 133665 JMS " I »J I t /J^'ITIAliZE CONSTANTS 

02737 1170LV- JMS TSTl.OC,X /XCT TEST PROGRAM IN RESIDENT FIELD 
0274T 6054P4 rR253 JMP ^253 /D*C INDEXED TO F0 FAILED 

02741 6094C6 ER254 J^P H254 /tAD INDEXED TO F0 FAILED 

02742 104023 J'^S DO^t 

.EJECT 



Y? 



P*CE 39 


IN0X15 


INDX15 










/TEST 
/ 

T13.31 


13,31 • 


TEST F3 FOR 


?2743 


104000 


J^^S 


HEPEaT 


?2744 


002762 




T13,32 




?2745 


404171 




XCT 


TEF^ 


?2746 


603435 




JMP 


TSTOP 


02747 


104364 




JMS 


HCRMEM 


22750 


204161 




u*c 


r3A 


02751 


344201 




TAO 


9I.0CK 


02752 


103502 




JMS 


MOVtl 


32753 


760301 




UAW 


301 


02754 


344203 




TAD 


BLKCON 


02753 


103665 




JMS 


MINIT 


02756 


117000 




JMS 


TSTLOC.X 


02757 


605410 


£R255 


JMP 


H255> 


02760 


605412 


ER260 


JMP 


H26i! 


02761 


104023 




JMS 


DONE 






/TEST 


13,32 - 


TEST f"3 FOR 


02762 


104000 


T13,32 


JMS 


REPEAT 


02763 


003001 




713,33 




02764 


404171 




XCT 


TEFS 


02765 


603435 




JMP 


TSTOP 


02766 


204161 




LAC 


r3A 


02767 


344201 




TAO 


8U0CK 


08770 


103514 




JMS 


M0VE2 


02771 


760302 




LAW 


302 


02772 


344203 




TAD 


8LKC0N 


02773 


103665 




JMS 


MlNlT 


02774 


117000 




JMS 


TSTLOC.X 


02775 


605414 


ER261 


JMP 


M26]. 


02776 


605416 


ER262 


JMP 


M262 


02777 


605420 


E«263 


JMP 


-^263 


03000 


104023 




JMS 


DONE 






/TEST 


13,33 - ' 


TEST f3 FOP 


03001 


104000 


T13,33 


JMS 


REPEAT 


03002 


003017 




TIS,41 




03003 


404171 




XCT 


TEPJ 


03004 


603435 




JMP 


TSTOP 


03005 


204161 




LAC 


F3A 


3300* 


3442P1 




TAO 


BLOCK 


03007 


103526 




JMS 


M0VE3 


0301? 


760303 




LAW 


303 


03011 


344203 




TAO 


BLKCON 


?3012 


103665 




JMS 


M I M T 


r'3013 


1170C0 




JMS 


TSTLOCX 


03014 


605422 


ER264 


JMP 


h264 


P3015 


605424 


ER265 


JMP 


H26t> 


^^3016 


104023 




JMS 

.EJECT 


DONE 



LAC*DAC« AUTO INDEX INDEXED TO F0 



/DOES This riELO exist? 

/NO, GO TO NEXT CROUP OF TESTS 

/ZERO All memory except fb once 



/yES, MOVE test PROGRAM TO THIS FIELD 
/TEST CokSTAnT 

/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM in RESIDENT FiELO 
/l.AC« AutO JNDEX INDEXED TO r0 FAILED 
/OAC» AutO index INDEXED TO F0 FAILED 

LACiOACSaD And JMS indexed in resident FIELD 

/CAL FROM HERE INDICATES JMS*XR FAILED 

/DOES This PIELO EXIST? 

/NOi go TO NEXT CROUP OF TESTS 



/YES, Move TEST program to THIS FIELD 
/TEST CovSTANT 

/lNlTIALl2e CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIEL^ 

/L*c inqexco in resident field Failed 

/QAC INoeXCD IN RESIDENT FIELD FAILED 
/SAO INDEXED IN RESIDENT TlELO FAILED 

QAC AND Tad Indexed to F0 



/DOES TmiS FIELD EXIST? 

/NOi GO TO NEXT GROUP OF TESTS 



/YESi move TEST PROGRAM TO THIS FlELO 
/TEST CONSTANT 

/I^IITIAliEE CONSTANTS 

/XcT TEST PROGRAM IN RESIDENT FirL' 
/OAC INDEXED TO F0 FAILED 
/TAD INDEXED TO F0 FMLED 
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1N0X15 


IN0X15 










/TEST ; 


13,41 « TEST F« FOR 


?3?17 


1040fli? 


T13.41 


J^S 


REPEAT 


f"3020 


P03036 




T13,42 




P3021 


104172 




XCT 


TEr4 


03022 


603439 




JMP 


TSTOP 


03023 


104364 




JMS 


2ERMEM 


23024 


204162 




LAC 


r4A 


^3029 


344201 




TAD 


BLOCK 


93026 


103902 




JMS 


MOVEl 


33027 


760401 




1.AW 


401 


33030 


344203 




TAD 


BLKCCN 


K3031 


103669 




JMS 


MlNlT 


03032 


117000 




JMS 


TSTLOC.X 


03033 


609426 


ER270 


JMP 


H2765 


03034 


605430 


ER271 


JMP 


M271 


03039 


104023 




JMS 


DONE 






/TEST 


13.42 - 


TEST r4 FOR 


?3036 


104000 


T1J.42 


JMS 


REPEAT 


^3037 


303095 




Tl3,43 




03040 


404172 




XCT 


TEr4 


03041 


603435 




JMP 


TSTOP 


03042 


204162 




LAC 


F4A 


?3043 


344201 




TAO 


BLOCK 


03044 


103514 




JMS 


M0Vt2 


03049 


760402 




LAW 


402 


73046 


344203 




TAO 


BLKCON 


33047 


103665 




JMS 


MlNlT 


03050 


117000 




JMS 


TSTCCCX 


03091 


605432 


ER272 


JMP 


H272 


03092 


605434 


ER273 


JMP 


H273 


23093 


605436 


ER274 


jMP 


H274 


23094 


104023 




jMS 


CONE 






/TEST 


13,43 « 


TEST F4 FOR 


I'3B59 


104000 


T13,43 


1 JMS 


REPEAT 


.•'3096 


003073 




T13.51 




5^3097 


404172 




XCT 


TEF4 


^3069 


603435 




JMP 


TSTOP 


?3061 


204162 




LAC 


F4A 


>?3e62 


3442P1 




TAD 


BLOCK 


^^3063 


103526 




jMS 


H0VE3 


P3064 


760403 




LAW 


403 


e3065 


344203 




TAD 


BLKCON 


.'3^66 


103665 




JMS 


M I M T 


!'3?67 


1170?? 




JMS 


TSTUCC.X 


.'3?7^ 


60944? 


LR275 


J"P 


H27t> 


.-S??! 


635442 


ER30? 


J"P 


j30K; 


.^3.^72 


104023 




.EJECT 


50NL 



LAC*OAC« AUTO INDEX INDEXED TO r0 



/DOES This field exist? 

/NO, CO TO NEXT GROUP OF TESTS 

/eero All memory except rz once 



/yCs, move test program to this field 
/t6st constant 

/iNITIALliE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIElO 
/LAC» AutO index INDEXED TO FB FAILED 
/DAC« AutO INDEX INDEXED TO F0 FAIL.ED 

LACiDAC.SAD AND JMS INDEXED IN RESIDENT FIELD 

/CAL FROM HERE INDICATES JMS*XR FAILED 

/DOES THIS FIELD EXISTt 

/NO, CO TO NEXT GROUP OF TESTS 



/ytS, MOVE TEST PROGRAM TO THIS FIELD 
/TEST Co\STAmT 

/iMlTIALlil CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/LAC INDEXED IN RESIDENT FIELD FAILED 
/DAC INDEXED IN RESIDENT FIELD FAILED 
/SAD INDEXED IN RESIDENT FIELD FAILED 

DAC AND TAO InoEXED TO FB 



/DOES THIS FIELO EXISTT 

/nO, CO TO NEXT GROUP OF TESTS 



/VES, HOVE TEST PROGRAM TO THIS FIELD 
/TtST C0\'STANT 

/INITIALIZE COf^iSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/DAC INorXlO TO F0 FAILED 
/tAO INDEXED TO F0 FAILED 



PACE 41 



IN0X15 



1^0X15 



?3!?74 

^zz7(> 

?3P7T 

(^310? 
?3101 
^3102 
e3103 
?3104 
03105 
^310» 
?3107 
03110 
Z31il 



?3112 
03113 
Z3114 
C3115 
?3116 
03117 
?3120 
^3121 
03122 
33123 
03124 
03125 
03126 
03127 
03130 



03131 
03132 
03133 
03134 
03135 
03136 
03137 
03140 
03141 
03142 
03143 
73144 
03145 
03146 



10400: 

003112 
404173 
603435 
104364 
204143 
344201 
103502 
760501 
3442e3 
103665 
11700? 
605444 
605446 
104023 



104002 
003131 
404173 
603435 
204163 
344201 
103S14 
760502 
344203 
103665 
117000 
60545? 
605452 
605494 
104023 



104000 
303147 
404173 
603435 
204163 
344201 
103526 
760503 
344203 
103665 
11700.^ 
605496 
6J546.^ 
104023 



/TEST 13,51 - TEST f5 FOB LAC^OAC* AUTO INDEX IMCEXEO TO r0 

/ 

T1J,51 J^S REPEAT 



ER>J01 
ER302 

/TEST 

/ 

T13,52 



ER303 
ER304 
ER305 

/TEST 

/ 

T13,53 



ER31P 
ER311 



JMS 

T13.52 
XCT 
JMP 
JMS 

u*c 

TAO 
jMS 
l,AW 
TAO 
JMS 
JMS 
JHP 
JMP 
JMS 

13.52 - 

JMS 

Ti3,53 

XCT 
JMP 
UAC 
TAO 
JMS 
LAW 
TAD 
JMS 
JMS 
JMP 
JMP 
JMP 
JMS 

13.53 - 

JMS 

T13,61 

XCT 

JMP 

LAC 
TAO 
JMS 

LAW 
TAD 
jMS 
JMS 

JMP 
JMP 
jMS 

.EJECT 



TEPf 

TSTOP 

ZERMEM 

P3A 

9L0CK 

HOVEl 

901 

aiKCoN 

MiNiT 

TSTLOC.X 

M301 

H302 

DONE 

TEST rs 



/QOES TmiS field EXIST? 

/NO, CO TO IVEXT GROUP OF TESTS 

/ZERO All memory except f0 once 



/yCs, 

/TEST 



MOVE TEST 

CONSTANT 



PROGRAM TO THIS FIELD 



/iNITIALliE CONSTANTS 

/XCT TEST PROGRAM in RESIDENT FiElO 
/L*C« AutO index indexed TO F0 FAILED 
/D*C» AutO index INDEXED TO r0 FAILED 



FOR LACOACjSAO And JMS indexed in RESIDENT FIELD 
REPEAT /C*L FROM MERE INDICATES JMS*XR FAILED 



FIELD EXIST? 

NEXT GROUP OF TESTS 



PROGRAM TO TMIS FIELD 



TEFS /qoes This 

TSTOP /nO, go to 

F5A 
SLOCK 

M0Vt2 /yES, MOVE TEST 

502 /TEST CokSTANT 

8LKC0N 
MINIT 
TSTLOCX 

H30.S /L*C INDEXED IN RESIDENT 

H304 /QAC INDEXED IN RESIDENT 

H30S /S*D INDEXED IN RESIDENT 

DONE 
TEST F5 For OAC and tad POEXEO TO F0 



/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM 



IN RESIDENT FIELD 
FIELD FAILED 



FIELD 
FIELO 



FAILED 
FAILED 



REPEAT 

TEF> 
TSTOP 

F5A 

BLOCK 
M0VE3 
503 

BLKCON 
^ I N I T 

tstlcc.x 

hSl" 
W3H 

DONE 



/DOES This 

/NO, GO TO 



FIELD EXIST? 

NEXT GROUP OF TESTS 



/VES, 

/TEST 



MOVf TEST 
CONSTANT 



PROGRAM TO THIS FIELD 



/INITIALIZE CONSTAMTS 

/XcT TEST PROGRAM 

/D*c iNnrXED TO F0 Failed 

/TAD INDEXED TO Fe FAILED 



IN RESIDENT Fir;,D 



PAGE «2 


1N0X15 


IN0X15 










/TEST 


13,61 - 


TEST F5 TQi 


?3147 


l0400,-5 


T13,61 


JMS 


REPEAT 


?315? 


?03166 




T13,62 




23151 


404174 




XCT 


TEr6 


e3l52 


603435 




JHP 


TSTOP 


?3153 


104364 




JMS 


2ERMEM 


<!3154 


204164 




LAC 


r6A 


?3155 


344201 




TAD 


BLOCK 


?3i56 


103502 




JWS 


MOVEl 


33157 


760601 




LAW 


601 


9)3160 


344203 




TAO 


BLKCON 


23161 


103665 




JMS 


MlNlT 


23162 


117000 




JMS 


TSTLOCiX 


83163 


605462 


E'?3l2 


JMP 


H312 


?3164 


605464 


ER313 


JMP 


H3i3 


23165 


104023 




JMS 


DONE 






/TEST 


13.62 . 


TEST F FOR 


t^3166 


10400? 


Tt3,62 


JMS 


REPEAT 


?3167 


1203205 




T13,63 




?3173 


404174 




XCT 


TEr6 


33171 


603435 




JMP 


TSTOP 


?3i72 


204164 




LAC 


F6A 


03173 


344201 




TAD 


BLOCK 


!»3174 


103514 




JMS 


M0VE2 


?3175 


760602 




LAW 


602" 


?3176 


344203 




TAO 


BLKCON 


03177 


103665 




JMS 


MjNlT 


03202 


117000 




JMS 


TSTLOCiX 


332fl 


605466 


znzu 


JMP 


H314 


93202 


605470 


ER315 


JMP 


H3iS 


09203 


605472 


ER32e 


JMP 


H32ia 


:?3204 


104023 




JMS 


DONE 






/TEST 


13,63 - 


TEST F6 F 


?3205 


104000 


T13,63 


JMS 


REPEAT 


?S206 


2103223 




T13,7l 




09207 


404174 




XCT 


TEr* 


23210 


609495 




JMP 


TSTOP 


?3211 


204164 




LAC 


F6A 


r32l2 


344201 




TAD 


BLOCK 


33213 


103526 




JMS 


M0VE3 


?3214 


7606?3 




LAW 


603 


?32l5 


3442?3 




TAO 


BLKCoN 


?3216 


103665 




JMS 


MlNlT 


r32i7 


11700? 




JMS 


TSTLOCX 


?322? 


60547* 


ER321 


JMP 


M321 


?3221 


605476 


ER322 


JMP 


M322 


?3222 


1174023 




JMS 

.EJECT 


DONE 



LAC*DAC» AUTO INOIX INDEXED TO TZ 



/DOES This field existt 

/NO, CO TO NEXT GROUP OF TESTS 
/ZERO All memory except F0 oncc 



/YESi move test program to THll FIELD 

/TEST Constant 

/iNlTIALlif CONSTANTS 

/xct test program in resident field 
/lac# Auto imdcx indexed to f0 failed 

/DAC« AUTO index INDEXID TO F0 FaILEO 

.AC.DACiSAD and JMS INDEXED IN RESIDENT FIELD 

/CAL FROM HERE INDICATES JMS*XR FAILED 

/DOES This FlEtO EXIST? 

/NO, 60 TO NEXT GROUP OF TESTS 



/YlS, MOVE TEST PROGRAM TO THIS FIELD 
/TEST CONSTANT 

/iNlTIALIiE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/LAC INDEXED IN RESIDENT FIELD FAILED 
/OAC INDEXED IN RESIDENT FIELD FAILED 
/SAD INDEXED IN RESIDENT FIELD FAILED 

DAC AND TAD INDEXED TO F0 



/DOES THIS riCLO EXISTt 

/NO, CO TO NEXT GROUP OF TEStS 



/VES, MOVE TEST PROGRAM TO THIS FIELD 
/TEST CONSTANT 

/I^ITIAli2E CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 

/OAC indeXco to f0 failed 

/T*0 INOEXEO TO Fa FAILED 



V 



PACE 43 


IN0X15 


1^0X15 










/TEST 


13,71 - 


TEST fi rop 


03223 


104000 


/ 

Tl3,71 


JMS 


REPEAT 


33224 


'03242 




T13,72 




03225 


404175 




XCT 


TEF? 


03226 


603435 




JHP 


TSTOP 


P3227 


104364 




JMS 


ZERMEM 


03230 


204165 




L4C 


r7A 


03231 


344201 




TAD 


BLOCK 


03232 


103502 




JMS 


MOVEl 


03233 


760701 




lAW 


701 


03234 


344203 




TAD 


BLKCON 


03235 


103665 




JMS 


MJNIT 


03236 


117000 




jfS 


TSTLOCiX 


03237 


605500 


ERS23 


JMP 


H323 


03240 


605502 


ER324 


JMP 


H324 


03241 


104023 




JMS 


DONE 






/TEST 


13,72 ; 


TEST r? FOR 


03242 


104000 


T15,72 


JMS 


REPEAT 


03243 


003261 




T13,73 




03244 


404175 




XCT 


tef; 


03245 


603435 




JMP 


TSTOP 


03246 


204165 




LAC 


F7A 


03247 


344201 




TAD 


8L0CK 


03250 


103514 




JMS 


M0VE2 


03251 


760702 




LAW 


702 


03252 


344203 




TAD 


BLKCON 


03253 


103665 




JMS 


MI NIT 


03254 


117000 




JMS 


TSTLOCiX 


03259 


605504 


E«325 


JMP 


H32S> 


03256 


605506 


ER330 


JMp 


H33B 


03257 


605510 


ER331 


JMP 


M331 


03260 


104023 




JMS 


DONE 






/TEST 


13,73 ^ 


TEST F7 FOR 


03261 


104000 


T13.73 


JMS 


REPEAT 


03262 


003435 




TSTOP 




03263 


404175 




XCT 


TEF7 


03264 


603435 




jMP 


TSTOP 


03265 


204165 




LAC 


F7A 


03266 


344201 




TAD 


BLOCK 


03267 


103526 




JMS 


M0VE3 


• 03270 


760703 




LAW 


703 


!'327l 


344203 




TAO 


BLKCoN 


03272 


103665 




JMS 


MlNlT 


03273 


117000 




JMS 


TSTLOCX 


03274 


605512 


ER332 


JMP 


H332 


03275 


605514 


ER333 


JMP 


H333 


?3276 


104023 




JMS 


DONE 


03277 


603435 




JMP 
.EJECT 


TSTOP 



LAC*DAC» AUTO fNOEX INDEXED TO F0 



/DOES TmiS field EXIST? 

/NO, 50 TO NEXT GROUP OF TESTS 

/ZERO All MEMORy except f0 once 



/yesi Move test program to this field 

/test CO^$TANT 

/I^ITIAliIE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/L*C» AUTO INOCX INDEXED TO F0 FAILED 

/DAc» Auto index indexed to f0 Failed 

LACiOAC.SaD and JMS INDEXED IN RESJOENT FIELD 
/C*L FRO^' HERE INDICATES JMS*XR FAILED 

/DOES This field exist? 

/NO, CO TO NEXT GROUP OF TESTS 



/YES, MOVE TEST PROGRAM TO THIS FIELD 
/TEST Co^STA^T 

/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FIELD 
/L*C INDEXED IN RESIDENT FIELD FaUEO 
/DAC INDEXED IN RESIDENT FIELD FAILED 
/3*0 INDEXED IN RESIDENT FIELD FAILED 

DAC AND TAD INDEXED TO F0 



/DOES This field exist? 

/NOi 00 to NEXT GROUP OF TESTS 



/yESi MOVE TEST PROGRAM TO THIS FIELD 
/TEST CONSTANT 

/INITIALIZE CONSTANTS 

/XCT TEST PROGRAM IN RESIDENT FiElD 
/DAC INDEXED TO F0 FAILED 
/T*D INDEXED TO F0 FAILED 



■-% 



PAGE 44 


!N0XIS 


I\DX15 










/TEST SU8B0UTINES TO CHECK 






/TEST riELDS TO 


SEE IF TCS 


{"3300 


?e0e«i7 


TESTF6 


e 




?3301 


203300 




LAC 


.»1 


J13302 


C43434 




DAC 


TRET 


33303 


204164 




LAC 


F6A 


03304 


344201 




TAO 


BLOCK 


03305 


721000 




PAX 




03306 


760006 




LAW 


6 


03307 


344203 




TAO 


BLKCON 


03310 


044204 




DAC 


TEMKON 


ZI3311 


217000 




LAC 


TSTWOC.X 


03312 


544204 




SAD 


TCMKON 


03313 


603320 




JHP 


.♦» 


03314 


605516 


Cn334 


JMP 


N334 


03319 


000000 


TESTF5 







03316 


203315 




LAC 


• >t 


03317 


043434 




DAC 


TB|T 


03320 


204163 




LAC 


r9A 


03S21 


344201 




TAO 


SLOCK 


03322 


721000 




PAX 




03323 


760005 




LAW 


5 


03324 


344203 




TAO 


8LKC0N 


03329 


044204 




OAC 


TIMKON 


03326 


217000 




LAC 


TSTLOCiX 


03327 


544204 




SAO 


TEMKON 


03330 


603335 




JMP 


.♦5 


03331 


609520 


ER335 


JMP 


H33> 


03332 


000000 


TESTF4 







03333 


203332 




LAC 


.•I 


03334 


043434 




OAC 


TRIT 


03335 


204162 




LAC 


r4A 


03336 


344201 




TAO 


BLOCK 


03337 


721000 




PAX 




03340 


760004 




LAW 


4 


03341 


344203 




TAO 


BLKCON 


03342 


044204 




DAC 


TEMKON 


03343 


217000 




LAC 


TSTLOCjX 


03344 


544204 




SAO 


TEMKON 


03345 


603352 




JMP 


.*5 


03346 


605522 


ER340 


JHP 


H34i^ 


03347 


000000 


TESTF3 







03390 


203347 




LAC 


.-l 


03351 


043434 




DAC 


TRET 


03352 


204161 




LAC 


F3A 


?i3353 


344201 




TAD 


BLOCK 


03354 


721000 




PAX 




;i3355 


760003 




LAW 


3 


l?3356 


344203 




TAO 


BLKCON 


23357 


?442?4 




DAC 


TEMKON 


K3367 


217000 




LAC 


TSTLOC.X 


03361 


544204 




SAO 


TEMKON 


^3362 


«03367 




JMP 


.*5 


03363 


605524 


ER341 


JMP 
.EJECT 


>i341 



FOR ILLEGAL HCMORY AQDRESSIMG 
T LOCATION! MODIFIED 



/SAVE For RETURN 

/PLACE FlELO AOORESS IN XR 



/E«ROR TEST LOC IN F6 MOOjriCO 



/SAVE For return 

/PLACE FIELD ADDRESS IN XR 



/ERRORi TEST I.OC IN F5 MODIFIED 



/SAVE For RETURN 

/PLACE FIELO ADDRESS IN xR 



/ERROR, TEST LOC IN F4 MODIFIED 



/SAVE ^OR RETURN 

/PLACE FIELD ADDRESS IN XR 



/E«RCR» TEST LOC IN F3 MODIFIED 



o 



PAGE 45 



IM0X15 



IV0X15 



03364 


?0000? 


33365 


203364 


03366 


043434 


33367 


2Z*i6i 


03370 


344231 


03371 


721000 


03372 


760002 


03373 


344203 


33374 


044204 


03375 


217000 


?3376 


544204 


03377 


603404 


03400 


605526 


03401 


000000 


03402 


203401 


03403 


043434 


03404 


204157 


03409 


344201 


03406 


721000 


03407 


760001 


03410 


344203 


03411 


044204 


03412 


217000 


03413 


544204 


03414 


603421 


03415 


605530 


03416 


000000 


03417 


203416 


03420 


043434 


03421 


204156 


03422 


344201 


03423 


721000 


03424 


760000 


03425 


344203 


03426 


0442134 


[^3427 


217000 


03430 


544204 


03431 


741000 


03432 


605532 


03433 


623434 


03434 


000000 



TESTr2 



E:R342 
TESTri 



ER343 
TESTr0 



ER344 

TRET 





LAC 

DAC 

LAC 

TAD 

PAX 

LAW 

TAD 

DAC 

LAC 

SAO 

JMP 

JMP 



LAC 

DAC 

LAC 

TAD 

PAX 

LAW 

TAD 

DAC 

LAC 

SAD 

JMP 

JMP 



LAC 

OAC 

LAC 

TAO 

PAX 

LAW 

TAD 

OAC 

LAC 

SAD 

SKP 

JMP 

JMP» 


.EJECT 



.-1 
TRET 

F?A 

BLOCK 

2 

8LKC0N 

TEMKON 

TSTLOCiX 

TEMKON 

.*5 

H34Z 

."1 

TRET 

riA 

BLOCK 

1 

TENKON 

TSTLOCiX 

TEMKON 

.*9 

H343 

i-i 

TRET 

F0A 
BLOCK 



BLKCON 

TEMKON 

TSTLOC,X 

TEMKON 

H344 
TRET 



/SAVE ^op RETURN 

/PLACE riELO ADDRESS I Ni XR 



/E«ROR» TEST LOC IN p2 moOITIEO 



/SAVE For return 

/PLACE FIELD ADDRESS IN xR 



/E«ROR, test LOC l^ Fl MODIFIED 

/SAVE Fob return 

/PLACE FIELD ADDRESS IN XR 



/CRRORi TEST LOC IN FB MODIFIED 



P*GE 46 1N0X15 I\DX15 

/ 

/PRINT END MESSAGE IF" DESlREO AND RESTART 
/ 

03435 2042^2 TSTOP L*C QLK^IO /HAS THE LAST BLOCK SEEN TESTED? 

03436 545652 SAO (3 

03437 603462 JMP TSTOl /yES, ExiT 

?344a 2042B1 LAC BLOCK /nO, IS cORC AVAILABLE FOR NEXT BLOCK 

03441 740031 CMAIIAC 

03442 344177 TAO CBL^ 

03443 74120? SNA 

33444 603462 JMP TSTOl /NlO, E^IT 

03445 444202 ISZ BLK^O /VES, UPDATE BLKNO 

03446 204203 LAC BLKCoN 
33447 345663 TAD (10 

03450 344203 OAC BL^CON /UPDATE BLOCK CONSTANT 

?3451 204201 LAC BLOCK 

03452 345656 TAO (100000 

03453 044201 OAC BLOCK /UPDATE BLOCK PC BITS 
5^3454 144211 D2M COUNT 

03455 20420? LAC CBli^Y 

03456 345664 TAD (-11^0000 /AOJUST rOR CORE 

03457 044200 CAC CSLl<X /aLREAOv TESTED 

03460 104104 JMS SENS /SET CORE SWITCHES 

03461 602157 JWP Tl2i0 /DO EXTENDED HCM TEST FOR NEXT BLOCK 

03462 750004 TSTOl LAS 

?3463 505665 AND (10B0 /MASK FoR BIT 6 QUICK VERIFY 

03464 740200 SZA 

03465 603475 J**P TS02 /0V«1 PrjNT END MESSAGE 

03466 750004 LAS /OV»0 CheCK BIT 11 

03467 505641 AND (10? 

03470 740200 SHA 

03471 600200 J'^P Tl.a /BIT ll«l, RESTART WITHOUT PRINTING, 

03472 104224 JMS TYPE 

03473 005534 mENO 

33474 600200 JMP T1,B 

03475 104224 TS02 JMS TYPE /PRINT EmD AND QUICK VERIFY MESSAGE 

03476 005534 ;^END 

03477 104224 jMS TYPE 
?3500 009541 '^OVr 

03501 600220 J^P T1,0 

.EJECT 



PACE 47 



IN0X15 



1NDX19 



/SUBROUTINE TO MOVE TEST PROGRAMS POR INDEXED OPERATION JN 

/EXTENDED ME»«ORy TO OTWER riEUOS TfOM FieLO Z 

/ 



03502 


300002 


553503 


721000 


03504 


[144205 


213505 


345666 


03506 


722000 


03507 


205667 


03510 


103540 


03511 


204205 


03512 


721000 


03513 


623502 


03514 


000000 


03515 


721000 


03514 


044209 


03517 


349670 


03520 


722000 


03521 


205671 


03522 


103540 


03523 


204205 


03524 


721000 


03925 


623514 


03926 


000000 


03927 


721000 


03530 


044209 


03531 


345672 


03532 


722000 


03533 


209673 


03534 


103540 


03939 


204209 


03536 


721000 


03537 


623526 


03540 


000000 


03541 


040010 


03942 


220010 


03543 


097000 


03544 


729001 


03549 


603542 


03546 


623940 



MOVEl 



^0VE2 



M0VE3 



MOVES 



? 

PAX 
DAC 
TAO 
PAW 
L*C 

JHS 

LAC 
PAX 

JMP« 



PAX 

OAC 

TAD 

PAL 

LAC 

JMS 

LAC 

PAX 

jMPt 



PAX 
DAC 
TAO 
PAL 

LAC 

JMS 

LAC 
PAX 

JMP» 



DAC 

lac» 

DAC 
AXS*1 

JMP 
JMP» 

.EJECT 



rjELO 
(ENOTI-TSTPI 

(TSTPl-1 

MOVES 

FIELD 

MOVEl 



riELO 
{ENDT2»TSTP2 

(TSTP2i!t 

MOVES 

riELD 

M0VE2 



riELD 
(ENOT3-TSTP3 

(TSTP3-1 

MQVES 
FIELD 

M0VE3 

;0 
10 

TSTLOCiX 

, >3 

«OVES 



XR 



/PLACE FIELD BITS IN 

/SAVE In field also 

/ADD THE NUMBER OF WORDS IN TEST PROGRAM 
/ADD TStlOC and SAVE IN LR 



/RESTORE Field bits in xr 



/SET WOrc 

/DEPOSIT IN NEW FIELD STARTING AT 7Zi>z 
/ADO 1 TO XR, SKIP IF TRANSFER COMPLETE 
/GET NEXT WORD 
/TRANSFER COMPLETE* EXIT 



PA6E «8 



IN0X15 



I\0)(15 



33547 
?3550 
03551 
03552 
03553 
03554 
03555 
03556 
03557 
03560 
03561 
?!3562 
2)3563 
03564 
03565 
03566 
03567 
03570 
03571 
03572 
03573 
23574 
03575 
03576 



140018 
14001? 
140101? 
75003? 
740030 
721000 
230017 
740001 
070016 
540058 
741000 
607023 
447000 
230010 
540050 
741000 
607023 
447000 
730000 
740031 
721000 
637000 
000000 



/RELOCATABLE TES 

/UPPER MEMORY Fl 

/AVO PROGRAM CON 

/ 

/TSTPl.flRST TES 

/TESTS roR LAC A 

/ 



T ROUTINES TO VERI^V INDEXED OPERATIONS IN 
ELDS, TwESE ROUTINES ARE MOVED TO UPPER MEMORY 
TROL IS tRANSEERED TO THEM, 

T ROUTINE rOR INDEXED OppRaTION IN EX. MEM 

NO oac ivdirect auto index ImDEXED, 



TSTPl 



ENDTl 



TSTPl 

OZM 

dzm 

OZM 

CLAilAC 

lAC 

PAX 

L*C» 

CMA 

OAC* 

SAD 

SKP 

JMP 

ISZ 

LAC* 

SAO 

SKP 

JMP 

iSi 

PL* 

C^AIIAC 

PAX 

JMP* 



.EJECT 



10 
17 
100 



17, X 

16, X 

50 

TSTL0C*23 
TSTUOC 
10|X 
50 

TSTW0C»23 
TSTUOC 



TSTLOCiX 



/CtEAR LOC l?, 17, 100 IN RESIDENT EIELO 



/PUT 2 i^ XR 

/GET CONTENTS OF LOC 13 JN Fi 

/s*vE Compliment in loc i4 in rz 

/W*S LOC 17 in rz AOORESSEO CORRECTLY? 
/yES, CovTiNUE TESTING 

/NO, EXIT 
/SETUP roR GOOD EXIT 
/GET CONTENTS OF L^C 14 IN F0 
/DID OAC* AUTO INOCX INOCXCO WORK? 
/YES, CONTINUE 

/NO, EXIT 
/SETUP FOR GOOD EXIT 
/PLACE COHP OF PC BITS 1*2 IN XR 



/GOOD EXIT 



:ry 
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1N0X15 



1N0X15 



/SECOND RClOC 
/TESTS FOR LA 



33577 


/ 
003577 TSTP2 TSTP2 




23600 


75003':" 


CLAilAC 




1^3601 


740030 


lAC 




03602 


721002 


PAX 




03603 


140012 


OiM 


13 


03604 


140053 


OHM 


93 


^3605 


140054 


02W 


54 


03606 


140055 


D2M 


55 


03607 


210776 


LAC 


776iX 


03610 


050013 


DAC 


10|X 


03611 


541000 


SAO 


100B 


03612 


741000 


SKP 




03613 


607032 


JMP 


TSTL0C*32 


03614 


447000 


iSi 


TSTUOC 


03615 


200012 


LAC 


12 


03616 


541000 


SAD 


1000 


03617 


741000 


SKP 




03620 


607032 


JMP 


TSTl.OC-32 


03621 


447000 


IS? 


TITUOC 


03622 


550776 


SAO 


776iX 


03623 


741000 


SKP 




03624 


627000 


JMP« 


TSTLOC 


03625 


447000 


tsz 


TSTUOC 


03626 


118053 


JMS 


53|X 


03627 


000000 


CAL 




03630 


000000 


CAL 




03631 


730000 


PL* 




03632 


740031 


CMA! lAC 




03633 


721000 


PAX 




03634 


637000 


JMP« 


TSTlOC.X 


03635 


200000 ENDT2 








.EJECT 





ATA8LE TEST ROUTINE POR INDEXED OPERATION IN EX« 
C» OACi SAD AND JMS INDEXEq IN RESIDENT FIELD 



/PLACE 2 In xR 



HEH 



/6ET CONTENTS OF LOC 1000 IN RESIDENT FIELD 
/OAC IN lOC 12 IN RESIDENT FIELD 
/OlO L*C*XR SUCCEED? 

/yESi conTinui 

/NOi ERROR EXIT 
/SETUP FOR GOOD EXIT 

/OlO 0AC*XII SUCCEED? 
/YCSi ComTINUE 

/NOi ERROR EXIT 
/SETUP roR 0000 EXIT 
/TRY TO SA0*XR 
/GOODi CONTINUE 
/8ADi Error EXIT 
/SETUP FOR GOOD EXIT 
/ATTEMPT A JMS*XR 
/IF CAL FROM HERE JMP« INDEXED 
/IN RESIDENT FIELD FAILED 
/PLACE COMP CF PC BITS 1*2 IN XR 



PhH '0 



1N0X15 



1N0X15 



03636 


003636 


03637 


724000 


03641? 


740031 


03641 


721000 


03642 


201000 


03643 


250100 


03644 


210100 


0364S 


541000 


03646 


741000 


03647 


607022 


036S0 


447000 


03651 


750000 


03652 


140100 


03653 


350100 


03654 


541000 


03655 


741000 


03656 


607022 


03657 


447000 


03660 


730000 


03661 


740031 


03662 


721000 


03663 


637000 


03664 


000001? 



/THISO RELOCATABLt TES 
/TESTS FOR DAC AND TaO 
/ 



TSTP3 



TSTP3 

PXA 

CMAl lAC 

PAX 

LAC 

OAC 

LAC 

SAO 

SKP 

JMP 

ISZ 

CLA 

DZM 

TAD 

SAO 

SKP 

JHP 

iSi 

PLA 

CMAtlAC 

PAX 

JMP« 



1000 
100»X 
100IX 
1000 

TSTUOC 
TSTLOC 

100 

100IX 

1000 

TSTLOC 
TSTLOC 



T ROUTINE !fO« INDEXED OPERATION IN EX.mEM 

InjDExco TO rz 



/GET riELO BITS, fORM TWOS COMPLIMENT 



/GET riELO TEST CONSTANT 

/DEPOSIT In lOC 100 IN ra 

/CET CONTENTS OF LOC 100 IN r0 
/TEST IF OaC indexed TO F0 WORKED 

/yEs, Continue 

/NOi EXIT 
/SETUP FOR GOOD EXIT 



♦22 



*22 



TSTLOC, X 



/CLEAR unC 100 IN RESIDENT FIELD 
/TAD LOC 100 FROM F0 

/DID TAD Indexed to f0 work 

/NOi EXIT 
/SETUP FOR 8000 EXIT 
/PLACE COMP OF PC BITS 1*2 IN XR 



/EXIT 



CNDT3 



.EJECT 






PACE 51 



IN0X15 



INDX15 



03665 


?0a000 


03666 


P510B? 


03667 


140014 


03670 


140100 


03671 


203674 


03672 


040013 


03673 


209679 


03674 


n400i6 


03675 


040010 


03676 


209663 


03677 


040017 


03700 


150776 


03701 


205641 


03702 


050040 


03703 


205676 


03704 


050050 


03705 


205677 


03706 


050051 


03707 


205700 


03710 


090056 


03711 


724000 


03712 


505701 


03713 


722000 


03714 


623*69 



03719 


003715 


03716 


003716 


03717 


003717 


03720 


^00000 


03721 


90000? 


03722 


i^00000 


03723 


300000 


03724 


?00000 


03725 


00000f 


03726 


623725 


03727 


009090 


03730 


443727 


03731 


623727 



/SUBROUTINE TO IN|TULIZf CONSTANTS ANO OPCHaTORS FOR EXbMEM TEST 
/ 

M I N I T 








DAC 


100lfl,X 


D?M 


14 


DIM 


100 


LAC 


(57t»634 


DAC 


13 


LAC 


<U 


DAC 


16 


OAC 


10 


LAC 


{10 


DAC 


17 


DZM 


776iX 


lAC 


(10ia 


DAC 


40|X 


LAC 


(202143 


DAC 


50|X 


LAC 


n« 


DAC 


51|X 


LAC 


{JMP« 55, X 


DAC 


56|X 


PXA 




ANO 


(300000 


PAL 




JNII»« 


MINIT 



/DEPOSIT TEST CONSTANT IN LOG 1000 l\ "^ESICEnT TIElO 



/PUT XR IN I.R 

/ONLY Block bits i*2 



/REPERENCE AREA TOR CORRECT INDEXjNC TESTS 

/ 

/USED FOR tACiXORiSAD 

GET GET 

5ET*1 

GET*2 
/USED FOR DAC»DHMilS?,AND 
PUT 



/PUT PROGRAM COUNTER IN OWN LOCATION 
/IF DAC INDEXED PLACED QUANTITY MERE IT 






/USE FOR JMS 

suei 

UHPt 
SUBIX 5? 

182 

JMP« 
.EJECT 



SU81 
SUBlX 

susix 



/JNS HERE IF INDEXED CORRECTLY 



PACE 52 


I^JDU? 


I\'DX15 
/USED 


POP JMP 








03732 


60166? 


SUB2 


JMP ERl'*? 


/jMP MERE 


IF 


INDE: 


P3733 


631661 




JMP ER145*1 


/jMp HERE 


ir 


GOOD 






/USE FOR XCT 








23734 


601676 


SUB3 


JMP ER147 








J93735 


601677 


/USED 


JMP ER147*1 
FOR AODiTAD 








?3736 


300037 


TOTE 


7 








03737 


30037? 




70 








{»374ffl 


?007?2 


/USED 


700 
FOn CAL» 








03741 


30000? 


SUB4 





/cal here 


IP 


6000 


03742 


443741 




ISi SUB4 








03743 


623741 




JMP« SUB* 








03744 


000000 


SUB4X 





/C*L HIRE 


ir 


BAD 


03749 


623744 


/USED 


jMP» sua*x 

FOR LAC*iDAC« 








03746 


003746 


ICET 


ICCT 








03747 


000000 


/USED 




roR jMS«ijMP» 








0375!!l 


003722 


JGET 


SUBl-3 








03751 


003752 


JSUB2 


JSUB2*1 








03752 


602015 




JMP ER1«>3 








03753 


602016 


/USED 


JMP ER163*1 
FOR SAO«iXCT» 








03754 


003715 


SGET 


OET 








03755 


003755 


SGETX 


SGETX 








03756 


003717 




GET*2 








03757 


203715 


/USED 


lAC GET 
rOR SAO* lliXCT* lliLAC» 


10,OaC« 10 






03763 


003760 


DATA 


DATA 








03761 


003761 




oata*i 








03762 


003762 




DATA*2 








03763 


?00000 


STORE 











03764 


£'0000(! 













03T65 


000000 













09766 


000000 




3 








03767 


203762 


/USED 


LAC 0ATA*2 
rOR JMP« 12,JMS* 12 








03770 


003771 


JSUB3 


JSUB3*1 








03771 


602155 




JMP ERl'* 








03772 


602135 




JMP ER174 








03773 


602136 




JMP ESi74*l 








03774 


000000 













03775 


623774 




JMP« ,.i 








33776 


30001?? 













?3777 


602142 




JMP ERl75«l 
.EJECT 
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IN0X15 



INDX15 



04000 


000000 


04001 


144206 


04002 


204000 


04003 


505702 


04004 


345630 


04005 


044214 


04006 


205703 


04007 


040021 


04010 


204211 


04011 


740200 


04012 


000000 


04013 


224000 


04014 


044207 


04015 


444000 


04016 


204217 


04017 


740001 


04020 


044211 


04021 


144212 


04B22 


624000 



04023 


000000 


04024 


204023 


04025 


505704 


04026 


740031 


04027 


344207 


04030 


741100 


04031 


000000 


04032 


204212 


04033 


741200 


04034 


444211 


04035 


624000 


?I4036 


750004 


04037 


751100 


0404(^ 


74100;; 


04041 


624023 


Z4P42 


204214 


04043 


74004? 


554044 


624023 



/DIAGMOSTIC 
/REPEAT SUBr 
/ADDRESS OF 
/STORE ADDRE 
/IN CASE OF 
/ADDRESS OF 
/ 



SUBROUTINES 
OUTINE " WILL INITI 
THE FIRST INSTHUCTI 
SS OF NEXT TEST IN 

A cal and nalT l^ l 

THE FIRST INSTRUCTI 



REPEAT 





DZH 

LAC 

AND 

TAD 

OAC 

LAC 

OAC 

LAC 

SiA 

CAL 

LAC* 

DAC 

is; 

LAC 
CMA 
OAC 

DIM 
JMP» 



FPRl 
REPEAT 
(77777 
<-l 

SAVIT 

(JMP TYPCAL 

21 

COUNT 



REPEAT 
nxtaqr 
REPEAT 
ITIN 

COUNT 

LOOP 

REPEAT 



ali«:e loop counter and store the 

qm of the present test in repeat, 

nxtaor 

dc 21, repeat ulll contain the 

ON OF THE TEST THAT CAUSED THE CAl, 



/CLEAR ERROR PRINTED FLAG 
/SAVE TEST ADDRESS 



/INITIALI2I L0C,21 FOR ILLEGAL CAL 

/WAS THIS ENTRANCE LEGAL? 

/NO, BAD TRANSFER OF THE PROGRAM CONTROL 
/YES. Co\TlNUE 

/get and save address of next test 

/pick up loop intinchation 
/megatc ano store 

/CLEAR loCK PN error FLAG 



/DONE SUBROUTINE • TEST LOOP FLAG, IF Set DO NOT UPDATE 
/COUNTER BUT LOOP CONTINUOUSLY. I^ ^LAG IS CLEAR UPDATE COUNTER 
/AND TEST FOR COMPLETION, IF COMPLETE CONTINUE ON TO NEXT TEST. 
/TEST FOR Halt bit AC0, !r A 1 halt at EnO of current TEST, 
/ 



DONE 

LAC ,«1 

ANO (177777 

CMAMAC 

TAD NXTADR 

SPA 

CAL 

LAC LOOP 

SNA 

IS2 COUNT 

JMP» REPEAT 

LAS 

SPAJCL* 
SKP 

j^p» oone 

LAC SAVlT 

HALT 

JMP» OONE 

.EJECT 



/FORM COMPLEMENT Of DONE ADDRESS 

/TO TRAP BAD AOORESSINC, 

/IS NXTAOR > PRESENT TEST ADDRESS 

/NO, BAD Transfer of the program control 
/SKIP ir LOCK ON ERROR Flag set 

/UPDATE COUNTER 

/GO THROUGH TEST AGAIN 

/IS 91T ;. SET? 

/YES, HLT WITH TEST ADR IN AC 

/NO, EXIT 



PACE 54 



1N0X15 



l\0Xi5 



/SETuP S'JBROUTI 
/AND LOOP ON Ef 
/PRIMT, IF PPOC 
/AND LOOP TEST 
/IP PROCEED ON 
/TEST, 



04045 


000000 SETUP 




Z'4046 


044210 


0*C 


SAVAC 


04047 


750000 


CLA 




04050 


740010 


RAl, 




04051 


044213 


DAC 


LINK 


04052 


204206 


LAC 


PPRl 


04053 


740202 


S2A 




04054 


604061 


JMP 


CK0 


04059 


750004 


LAS 




04056 


905637 


AMD 


<40B 


2405? 


74120? 


SNA 




?<4060 


104460 


JMS 


PRJNT 


214061 


75000* CK0 L*S 




04062 


741100 


SPA 




34063 


741000 


SKP 




04064 


604067 


JHP 


.*3 


04065 


204214 


LAC 


SAVIT 


04066 


740040 


HALT 




04067 


750004 


LAS 




04070 


505735 


AND 


(200 


34071 


741200 


SNA 




04072 


604075 


JMP 


.♦3 


04073 


144211 


DIM 


COUNT 


04074 


624207 


JMP» 


NXTADR 


04075 


204212 


LAC 


LOOP 


04076 


741200 


SNA 




04077 


444212 


ISE 


LOOP 


24100 


204213 


LAC 


LINK 


?4iei 


740020 


BAR 




04102 


204210 


LAC 


SAVAC 


04103 


624000 


JMP» 

.EJECT 


REPEAT 



nE - TEST AC SWITCHES POR SUPPRESS ERROR TYPEDUT 

RoRi If Suppress error Typeout bit set, do ^ot 

EEO 0\ ERROR BIT IS NOT SET, SET LOOP FLAG 

CONTINUOUSLY I*^ ANY ERROR ENCOUNTERED, 

ERROH JS SET, PRINT IF APPLICABLE aNQ CONTINUE ON TO NEXT 



/SAVE AC AND LINK 



/HAS THIS ERROR BEEN PRlNTCDf 

/y6Si DOKi'T DO IT 

/TEST Fob BIT 9, SUPPRESS ERROR TYPEOUT 



/IS BIT SCTt 

/yESi Halt with test address in ac 
/no, comtInue 

/Y&s, Stop here 

/tSst For bit ia« proceed on error 

/IS PROCEfO ON EPROR FLAG SETT 
/CUCAR LOOP COUNTED 

/ycs, contjnuc on to next test 

/has loop FLAC 9EEN SET YET? 

/StT LOOP ON ERROR FLAG 
/RCST0«E AC aNO link 



PACE 55 INDX15 IN0X15 



?4104 


000000 


04105 


209660 


^4106 


044167 


?4107 


044170 


04110 


044171 


i?4111 


044172 


34112 


044173 


04113 


044174 


04114 


044175 


04115 


205706 


04116 


044166 


04117 


204176 


04120 


344203 


04121 


741200 


04122 


624104 


04123 


544157 


04124 


604153 


P4125 


544160 


04126 


604151 


04127 


544161 


04133 


604147 


04131 


544162 


04132 


604145 


?4133 


544163 


04134 


604143 


04135 


544164 


04136 


604141 


04137 


205706 


04140 


044175 


04141 


205706 


04142 


044174 


04143 


205706 


04144 


044173 


04145 


205706 


04146 


044172 


04147 


209706 


04150 


044171 


04151 


209706 


04152 


04'4170 


04153 


205706 


04154 


044167 


04155 


624104 



/TEST rOR EXTRA MEMORY By SEMSINC AC SWITCHES BITS 3-5 
/AND SETTING LOC TEPl-TEf? WITH A SkP Ir NON.EXISTANT 
/EACH BLOCK Of MEMOSv JS DONE ONE AT A TIME 
/ 



SENS 



lAC 


(NOH 


DAC 


TEFl 


DAC 


TEF2 


DAC 


TEF3 


DAC 


TEr4 


DAC 


TEr5 


DAC 


TEF6 


DAC 


TEF7 


lAC 


(SKP 


DAC 


TEFB 


LAC 


CFLD 


TAO 


CBUKX 


SNA 




JMP» 


SENS 


SAO 


riA 


JMP 


EM8K 


SAD 


r2A 


JHP 


EM12K 


SAO 


r3A 


JMP 


EM16K 


SAD 


F4A 


JMP 


EM2S5K 


SAD 


F5A 


JMP 


EM24K 


SAD 


F6A 


jMP 


EM2BK 


LAC 


(SKP 


DAC 


TEF7 


LAC 


(SKP 


DAC 


TEFf 


LAC 


(SK^ 


DAC 


TEF5 


LAC 


(SKP 


DAC 


TEF4 


LAC 


(SKP 


DAC 


TEfS 


LAC 


(SKP 


DAC 


TEr2 


LAC 


(SKP 


DAC 


TEFi 


JMP» 


SENS 


.EJECT 





/INITIALIZE ALL FLAGS 



/O^LT 4k Continue 

/8K 

/12K 

/X*K 

/20K 

/24k 

/26k 
EM32K LAC (SKP /32K OR GREATER 

EM28K 

EM24K 

EM20K 

EMJ6K 

EM12K 

£M8K 



■^1 
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1N0X15 


IN0X15 








/EXTENDED INOCXED ME 




207000 


/ 

TSTloCs 


7000 


?4156 


?i00a00 


r0A 


Z 


04157 


1310008 


ri* 


10000 


04163 


920000 


r2A 


20000 


04161 


030000 


F3A 


30000 


04162 


340000 


F4A 


40000 


04163 


050000 


F5A 


50000 


04164 


060000 


F6A 


60000 


04165 


270000 


F7A 


70000 






/EXISTENT FIELD INDI 


04166 


000000 


TEF0 





B4167 


000000 


TEFl 





174170 


000000 


TEF2 





04171 


000000 


TEF3 





04172 


000000 


TEF4 





04173 


000000 


TEF5 





04174 


000000 


TEF6 





04175 


?00000 


TEF7 





04176 


300000 


CFLO 





04177 


000000 


CBIK 





04200 


000000 


CBUX 





04201 


000000 


BLOCK 





04202 


000000 


SLKNO 





0420S 


000000 


8LKC0N 


3 


04204 


000000 


TEMKON 


3 


04205 


000000 


FIELD 





04206 


000000 


FPRl 





04207 


000000 


nxtaor 





04210 


000000 


SAVAC 





042U 


000000 


COUNT 





04212 


000000 


LOOP 





04213 


00000? 


LINK 





04214 


?00000 


SAVIT 





04215 


PI00000 


BANKSW 


e 


04216 


000000 


POINTI 





04217 


007777 


ITIN 


7777 


P422P 


000000 


TEMQ 





04221 


000000 


TEMP 





34222 


C00000 


FTVPE 


3 


04223 


?00000 


FTITLE 



.EJECT 



K'ORV TEST PARAMETERS 

/TEST LOCATION IN MEMORY 



CATOR STORAGE 



/pC BITS 3«S OF MAX CORE AVAILABLE 
/PC B|TS 1*2 OF MAX CORE AVAILABLE 
/PP BITS FOR SENS 
/PC BITS l»| OF BLOCK UNDER TEST 
/StOCK NUMiCR FOR PRINTOUT 
/BLOCK CONSTANT FOR TESTING 
/TEMPORARY TEST CONSTANT 

/E«ROR ALREADY PRINTED FLAG 

/ADDRESS OF NEXT TEST 

/STORE CcNTtNTS OF AC 

/STORE NUMBER OF TIMES TO DO TEST 

/SPOPE LOOP FLAG. 1 • SCOPE LOOP 

/CURRENT TEST ADDRESS 

/BANK Mods switch test flag 

/TEMP POINTER FQR INDIRECT INDEXING 
/NUMBER oF TIMES EACH TEST IS DONE 
/TEMPORARY STORAGE MESSAGE 
/TEMPORARY STORAGE 
/TEMPORARY STORAGE MESSAGE 
/TITLE FLAGi liPRINTED 
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IMDX15 



IN0X15 



34224 


000032 


34225 


224224 


04226 


044220 


04227 


144222 


34230 


444224 


24231 


224220 


04232 


742010 


04233 


742010 


34234 


742010 


04235 


740010 


04236 


104250 


04237 


224220 


04240 


742020 


04241 


742020 


04242 


742020 


04243 


104250 


?4244 


224220 


04249 


104250 


04246 


444220 


04247 


604231 


04250 


5*00000 


04251 


505707 


34252 


044221 


?4253 


204222 


04254 


740200 


04255 


604265 


04256 


204221 


04257 


741200 


04260 


604263 


04261 


104274 


04262 


624250 


04263 


444222 


04264 


624250 


04265 


144222 


04266 


204221 


04267 


741200 


34270 


624250 


04271 


545707 


04272 


624224 


04273 


604261 



/SIXBlT UNPACKING ROUTlNf 

/X9CARRIAGE qETuRNi #»LNE TEEDi mEsSaCe: HuST 6E TErmJnatED 

/BY *? ENTER WIT-* J^S TYPE FOLLOWED BY START CF MESSAGE ADDRESS 

/ 

TYPE 



TSCl 



TSC2 



TYPAT 



TYPSP 



3 

lac« 


TYPE 


/GET AND STORE STRING ADRE8S 


DAC 


TEMU 




02M 


TTYPE 


/CLEAR TYPE FLAC 


!Si 


TYPE 


/SET FOR GOOD EXIT 


lac« 


TEMQ 


/GET DATA WORD 


RTL 






RTL 






RTL 






RAL 






JMS 


TSC2 


/TYPE FjrST CHARACTER 


LAC* 


temo 




RTR 






RTR 






RTR 






JWS 


TSC2 


/TTPE Second character 


LAC* 


TCMQ 




JMS 


TSC2 


/TTPE Third character 


ISi 


TEMQ 


/gPDATE DATA ADDRESS 


JHP 


AND 


TSCl 




(77 


/MASK Excess bits 


OAC 


TEMP 




LAC 


FTYPE 


/IS SPECIAL CNARACTER FLAG SE 


SIA 






JHP 


TYP5P 


/YES 


LAC 


TEMP 


/NO, GET CHARACTER 


SNA 




/If IT Z 1 


JMP 


.*3 


/yEs, Special character 


JMS 


TTOUT 


/NO, GO PRINT character 


JMP* 


TSC2 


/tMT Tsc2 


ISZ 


FTYPE 


/SET SPECIAL CHARACTER FLAG 


JMP» 


TSC2 


/EXIT Tsc2 


DZM 


PTYPE 


/CLEAR SPECIAL CHARACTER FLAG 


LAC 


TEMP 




S'«A 




/IS IT 7 


JMP« 


TSCZ 


/yES IGNORE IT, EXIT TSC2 


SAD 


(77 


/I8 IT 77? 


JMP« 


TYPE 


/yES EXIT TYPE SUBROUTINE 


JMP 


TYPAT 


/NO 


.EJECT 
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1NDX15 


INIDX15 








?4274 


e000?0 


TTOUT 









04?75 


545710 




SAD 


(45 


/IS IT 45? 


04276 


604307 




JMP 


PRINtB 


/yEs, Type IT 


04277 


545711 




SAD 


{43 


/IS IT 43» 


04300 


604311 




JMP 


PRINTC 


/y£S, TypE IT 


04301 


345712 




TAD 


(-4^ 


/NO 


04302 


741100 




SPA 






04303 


345641 




TAD 


(10? 




04304 


345713 




TAD 


(240 




04305 


104575 


PRINTA 


JH8 


OTY 


/TTPE CMiRACTCR 


04306 


624274 




JMP» 


TTOUT 




04307 


760215 


PRlNTB 


LAW 


215 




04310 


604305 




JMP 


PRJNTA 


/TTpE Carriage return 


04311 


760212 


PRINTC 


LAW 


212 




04312 


604305 




JMP 


PRINTA 


/TTPE LI^E FEED 






/ 

/INITNi 

y 


INITIALIZE LOOP I 


COUNTER rOR NORMAL ITINERATION 


04313 


000000 


/ 

INITN 









04314 


144211 




DIM 


COUNT 




04315 


205714 




LAC 


(7777 




04316 


044217 




DAC 


ITIN 




04317 


624313 


y 


jMPt 


INITN 








/INIT10 

/ 

INIT10 


-INITIALIZE LOOP 


COUNTER roR 1 lOCPS 


04320 


2:00000 









04321 


144211 




DIM 


COUNT 




04322 


205649 




LAC 


(1 




04323 


044217 




DAC 


ITJN 




04324 


624320 




JHP» 


INIT10 








/RANDOM 
t 

RANDOM 


NUMBER 


GENCRaTOR-EXIT WITH NUMBER IN AC AND R 


04325 


000000 









04326 


750000 




CLA 






04327 


344340 




TAD 


RANA 




04330 


344341 




TAO 


RANB 




04331 


044340 




DAC 


RANA 




04332 


750000 




CLA 






04333 


740010 




RAL 






04334 


344340 




TAD 


RANA 




04339 


344341 




TAO 


RANB 




04336 


044341 




DAC 


RANB 




34337 


624325 




JMP« 


RANUOM 




04340 


731422 


^»NA 


731420 






04341 


!^15612' 


i^ANB 


215610 
.EJECT 
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l^JDXlS 



IN0X15 







/ 
/ZERO 

y 


UNUSCO 


PORTIONS P 


04342 


200000 


it^VZ 


?, 




34343 


1442H 






OEM 


COUNT 


34344 


144363 






OZH 


POINT 


34345 


164363 






D2M» 


POINT 


04346 


444363 






IS2 


POINT 


04347 


204363 






LAC 


POINT 


04350 


545705 






S*0 


(200 


04351 


741000 






SKP 




04353 


604345 






JMP 


iERF0*3 


04953 


205627 






L*C 


SliC 


04354 


044363 






OAC 


POINT 


04355 


444363 






ISI 


POINT 


04356 


164363 






OiM* 


POINT 


04557 


204363 






L*C 


POINT 


04360 


545714 






SAO 


(7777 


04361 


624342 






JHP« 


ZEPr0 


04362 


604355 






JHP 


."5 


04363 


000000 


PO 


INT 








FIELD 



04364 


00^000 


854365 


44400C» 


04366 


444000 


04367 


444000 


04370 


205627 


04371 


040015 


04372 


750004 


04373 


505715 


34374 


345714 


04375 


044363 


34376 


160015 


04377 


200015 


04400 


544363 


04401 


624364 


04402 


604376 



/2tR0 ALL MEMORY EXCEPT TBI 
/MEMORY IS ONLY HE^OEO OnCE 
/PROGRAM IS ONLY MOVED OmCE 
/ 
^ERMEM 



/INITIALIZE TEST ANQ LOOP COUNTER 

/ZERO LOCATIONS 0»177 

/ZERO LOCATION 

/UPDATE POINTER 

/GCT POivT 

/HAS LOC. 177 BEEN ZEROED VET? 

/yfSi C0^TINuE 

/nOi loop 

/2tR0 ^RCM TOP or PROGRAM TO 7777 

/SAVE It 

/UPDATE POINTER 

/ZCRO LOCATION 

/5tT POikjTER 

/HAS LOC, T777 BEEN ZEROED YETt 

/YES, Exit 

/NO, LOOP 

/POINTER FOR CLEARING OPERATION 

UPDATE REPEAT 80 THAT EXTENDED 

EACH EXTENDED MEMORY TEST AND THAT TEST 





IS2 


REPEAT 


/UPDATE REPEAT 


ISZ 


REPEAT 




I8H 


REPEAT 




LAC 


SIZE 




OAC 


15 




LAS 






AND 


(3T0000 


/GET FIELD aiTS 


TAD 


(7777 




DAC 


POINT 


/FORM I.AST ADDRESS 


DZM* 


15 


/ZERO LOCATION 


LAC 


15 


/wAs IT THE LAST ONCT 


SAO 


POINT 




JMP« 


lERMEM 


/ycs. Exit 


JMP 


.•4 


/NO, LOOP 


•EJECT 







w- 



r 
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!NDX19 



IMDX15 







/TCOREi 
/ 

TCORE 


•INITIAL! 


2E CORE 


CONSTANTS AND TEST SWITCHES rOR 


?4403 


000000 









34404 


144200 




DZM 


C8LKX 




34405 


144177 




OZM 


CBL^ 




34406 


144201 




02M 


BLOCK 




04407 


144202 




02M 


BLK^'O 




04410 


144203 




OHM 


BLKCON 




04411 


144176 




DIM 


crLD 




?4412 


750004 




LAS 






04413 


509716 




ANO 


(701000 


/Pp 8ITS 3.5 IN CFLD 


04414 


044176 




OAC 


CfLO 




04415 


750004 




LAS 






04416 


509701 




ANO 


(300000 


/pC BITS 1*2 IN CBLK 


04417 


044177 




DAC 


CBL»< 




04420 


044200 




OAC 


CBU^X 




04421 


624403 




jHPm 


TCORC 








/ 

/OCTAL 

/ 

OCTP 


PRINT - 


NO ZERO 


SuPRESSlON 


04422 


000000 









04423 


044456 




OAC 


XOCTi 


/S*VE QUANTITY 


04424 


742030 




SWHA 




/SWAP HALVES OF AC 


04425 


r'44457 




OAC 


X0CT2 


/s*vc Swapped AC 


04426 


104436 




JMS 


0CTP3 


/PRINT HI ORDER THREE 


04427 


204456 




L*C 


XOCTl 


/GET UNSWAPPEO QUANTITY 


04430 


044457 




OAC 


X0CT2 


/S*VE UNSWAPPEO AC 


04431 


104436 




JMS 


0CTP3 


/PRINT LO ORDER THREE 


04432 


760243 




LAW 


240 


/SPACE 


04433 


104575 




JMS 


OTV 


/P«INT IT 


04434 


104579 




JHS 


OTY 




04435 


624422 




JMP» 


OCTP 


/EMT 


04436 


300000 


0CTP3 









04437 


742020 




RTR 




/SHIFT 6 RICHT 


04440 


742020 




RTR 






04441 


742020 




RTR 






04442 


104450 




JMS 


OCTSuS 


/pRINT 1ST CHARACTER 


04443 


740020 




RAP 




/SHIFT 4 RIGHT 


04444 


742020 




RTR 






04445 


104450 




JMS 


OCTSuB 


/PSINT 2n0 CHARACTER 


04446 


104450 




JMS 


OCTSuB 


/pRiNT 3R0 CHARACTER 


04447 


624436 




JMP« 


0CTP3 




04450 


000000 


0CTSU8 









04451 


505717 




AVO 


(7 




04452 


3*5720 




TAO 


(2613 




04453 


104575 




J«S 


OTY 




04454 


204457 




LAC 


X0CT2 




04455 


424450 




JMP» 


OCTSuB 




04<56 


?e0000 


XOCTl 









04457 


'00000 


X0CT2 


9 

.EJECT 







PACE 61 



IN0X19 



1^0X15 



74461 
04462 
?4463 
?4464 
04465 
^4466 
04467 
i?!447? 
04471 
04472 
04473 
04474 
04475 
04476 
04477 
0450?! 
04501 
04502 
04503 
04904 
04505 
04506 
34507 
0451? 
04511 
04512 
04513 
04514 
04515 
34516 
04517 
04520 
04521 
04522 
04523 
04524 
04525 
04526 
04527 
0453«" 
04531 
04532 
04533 
04534 
04535 
04536 
J!4537 
0454-' 



000000 
204206 
741200 
444206 
104603 
760305 
104575 
760322 
104575 
224045 
505635 
104422 
760320 
1^4575 
760301 
104575 
760323 
104575 
104575 
760279 
104579 
204211 
740030 
344217 
740030 
104422 
760301 
104575 
760303 
104575 
760275 
104575 
204210 
104422 
760314 
104575 
760275 
104575 
204213 
740200 
604534 
760263 
104575 
604536 
760261 
104575 
760240 
104575 
104575 



/primt er^or number* contents or AC, LInKi XR, L" 

fRI.NT 



2 




LAC 


rpRl 


SNA 




ISI 


TPRl 


JMS 


CfltF 


LAW 


305 


JMS 


OTY 


LAW 


322 


JMS 


OTV 


LACt 


SETUP 


AND 


(777 


JMS 


OCTP 


LAW 


320 


JMS 


OTY 


LAW 


301 


JMS 


OTY 


LAW 


323 


JMS 


OTY 


JMS 


OTY 


LAW 


275 


JMS 


OTY 


LAC 


COUNT 


1*C 




TAO 


ITJN 


lAC 




J'^S 


OCTP 


LAW 


301 


JMS 


OTY 


LAW 


303 


J"8 


OTY 


LAW 


275 


JMS 


OTY 


LAC 


SAVAC 


JMS 


OCTP 


LAW 


3i« 


JMS 


OTY 


LAW 


275 


JMS 


OTY 


LAC 


LINK 


SIA 




JMP 


.*4 


LAW 


260 


J'^S 


OTY 


JMP 


,•3 


LAW 


261 


JMS 


QTY 


LAW 


240 


JMS 


OTY 


J^S 


OTY 



/HAS ERROR PR1^TED QVCEi FLAG SET? 
/NO, SET Jt 



/C 



/R 



/GET ERROR NUMBER 

/MASK Out law 

/PRINT OCTAL EQUIVALENT oF AC 

/P 



/A 



/S»S 



/GET LOOP COUNTER AND CALCULATE 
/NUMBER C:f PASSES COMPLETED 
/AND PRINT IT. 



/A 
/C 
/■ 

/GET CONTENTS OF AC 

/L 

/» 

/GET CONTENTS OF LlN< 

/PRINT 

/PRINT 1 
/SPaCEiSpacE 



■^ ' 



.EJECT 



AGE 62 


INOXl 


?4541 


760330 


74542 


104575 


Z4543 


760322 


Z4544 


10'»575 


04545 


760275 


04546 


104575 


04547 


724000 


04551? 


104422 


04551 


760314 


04552 


104575 


04553 


760322 


04554 


104575 


04555 


760275 


04556 


104575 


04557 


730000 


04560 


104422 


f!4561 


760302 


04562 


104575 


04563 


760314 


04564 


104575 


04565 


760313 


04566 


104575 


04567 


760275 


04570 


104575 


04571 


204202 


04572 


345720 


04573 


104575 


04574 


62446? 


04575 


000000 


04576 


700406 


04577 


700401 


04600 


604577 


?4601 


700492 


04602 


624575 


04603 


?00000 


04604 


760215 


34605 


104575 


?4606 


760212 


04607 


104575 


24610 


624603 



I^0X15 



OTV 



:«ir 



LAW 


330 


jMS 


OTY 


L*** 


322 


J^S 


OTY 


LAW 


275 


JMS 


DTY 


PXA 




JMS 


OCTP 


LAW 


314 


JHS 


OTY 


LAW 


322 


jMS 


OTY 


LAW 


275 


JMS 


OTY 


PLA 




JHS 


OCTP 


LAW 


302 


JMS 


OTY 


LAW 


314 


JMS 


OTY 


LAW 


313 


jMS 


OTY 


LAW 


275 


JWS 


OTY 


UAC 


BI.KNO 


TAD 


(26ia 


J-^S 


OTY 


JMP« 


PRINT 


CWARACTER ON 







TLS 




TSF 




JMP 


.-i 


TCf 




JHP» 


OTY 







LAW 


215 


JMS 


OTY 


LAW 


212 


J-S 


OTY 


JMP» 


CRL^' 


.CJECT 





/x 
/Q 
/■ 

/GtT COvTtN'TS Cr XB 

/L 
/R 
/» 

/ctT CONTENTS or ls 

/B 

^L 
/K 
/« 

/pRiNT CORE B1.0CK 



/PRINT CaHRUCE RETJ!»N ♦ LINE FEED 
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INDX15 



IV0X15 



?4611 


344213 


?4612 


752024 


?4frl3 


505637 


.^4614 


741201^ 


P4615 


604623 


?4616 


76U777 


.'4617 


74004C' 


?462P 


204212 


^4621 


7421040 


?4622 


604621 


?4623 


104603 


P4624 


760303 


34625 


104575 


?4626 


760321 


?462T 


124575 


J463P 


760314 


?4631 


104575 


-4632 


760240 


?4633 


104575 


?4634 


7603?1 


04635 


104575 


^■463* 


760304 


?'4637 


104575 


34643 


760322 


24641 


104575 


?4642 


760275 


04643 


104575 


34644 


200020 


?4645 


740200 


34646 


345633 


34647 


5?5732 


P4653 


104422 


34651 


763324 


74652 


104575 


^4653 


760335 


34654 


104575 


34655 


760323 


34656 


104575 


34 657 


760324 


34663 


104575 


34661 


763243 


34662 


134575 


34663 


762331 


34664 


104575 


34665 


763334 


34666 


104575 



/TVPE t.HEN CAL OCCU«S»TypE WMERE CALEO THOM 4^D ADDRESS 0^ PRESENT TEST 
/AND CONTENTS Of ACt IT kO P»INTOuT HESIbEO 
/WALT .ITN LAW 7/7 Ik AC 

/SAvE AC 

/TEST Foe BIT S, SUPSESS ERROR TVP«0UT 

/IS 9IT 9 SET? 

/NOi COntIMUE ^*ITW POINTOUT 
/yESi HALT WITH LAW 777 IN AC 

/DISPLAY CONTENTS OF AC WHEN CONTINUE PRESSED 



/ 




TyPCAL DAC 


SA\/AC 


LAS 




AND 


(40^ 


S><A 




JMP 


.♦6 


LAW 


777 


HALT 




LAC 


SAVAC 


HALT 




J»-P 


.-1 


J^*S 


CRLf 


LAW 


303 


JMS 


OTY 


LAW 


301 


JMS 


OTY 


LAW 


314 


JMS 


OTY 


LAW 


240 


JMS 


oTy 


LAW 


301 


JMS 


OTY 


LAW 


304 


J«S 


OTY 


LAW 


322 


JMS 


OTY 


LAW 


275 


JHS 


OTy 


L*C 


20 


SEA 




TAO 


(»1 


AND 


(77777 


JMS 


OCTP 


LAW 


324 


JMS 


OTT 


LAW 


305 


JMS 


OTY 


LAW 


323 


jMS 


OTY 


LAW 


324 


J^S 


OTY 


LAW 


243 


J^'S 


OTy 


LAW 


301 


j-S 


OTY 


L** 


334 


J"S 


OTY 


.EJECT 





ir 



/PRINT CR i 
/C 

/A 

/L 

/SPACE 
/A 
/D 



/R 

/■ 

/PRINT CONTENTS OF LCC20(.l) 



/H*SK NON ADDRESS BITS 



/T 



/E 



/S 



/T 



/S^ACE 
/A 



/D 



PAGE *4 



IMDX15 



I'mDXIS 



74667 
?.*i77 
r4671 

e4*72 

."4673 
?4674 
P4675 
04676 
e4677 
P47^? 

e47ei 

04702 
?4703 
?4704 
P4705 
P4706 
?4707 
?4713 

e47ii 

24712 
04713 
?4714 
24715 
?4716 
04717 
?472' 
24721 

?4722 
?4723 
34724 
?4725 
?!4726 
?4727 
3473:' 
04731 
04732 
04733 



760322 
1B4575 
76!'275 
104575 
204214 
104422 
7603l?l 
104575 
760303 
104575 
76t»275 
104575 
204210 
104422 
76033E 
104575 
760322 
104575 
760275 
104575 
72400!? 
104422 
760302 
104575 
760314 
104575 
760313 
104575 
760275 
104575 
304202 
34572? 
104575 
74004? 
104342 
104364 
624214 



LAW 


322 


JMS 


OTV 


LAW 


275 


j-S 


5TV 


LAC 


SAVJT 


JVS 


OCTH 


LAW 


301 


jMS 


OTV 


LAW 


303 


JHS 


OTV 


LAW 


275 


JMS 


OTY 


LAC 


SAVAC 


JMS 


OCTP 


LAW 


330 


jMS 


OTY 


LAW 


322 


JMS 


OTV 


LAW 


275 


JMS 


CTV 


PXA 




JMS 


OCTP 


LAW 


302 


JMS 


OTY 


LAW 


3i4 


JMS 


OTY 


LAW 


313 


JMS 


OTY 


LAW 


275 


JMS 


CTY 


LAC 


StKMC 


TAO 


{26(0 


JMS 


OTY 


HALT 




JMS 


2ERf^0 


JHS 


2ERMCM 


J"P« 


SAVlT 


.EJECT 





/» 

/A 

/C 

/• 

/GET CONTENTS OF AC 
/pHjMT CPNTC^JT Of *C 
/X 

/» 

/t 



/B 

/I 
/K 
/■ 



/T«Y TEST AGAIN WJTh 1 M T I AL 1 1 ATI QN 



1 



PACE 65 



INDX15 



I\0X15 



►ITH A LAU XX 
UH6E«, PRESSING 



/DIAGNOSTIC ERPOP hAlT SECTIONI 

/WHEN AN ERROR IS ENCOLN^EBCO A jyMP TO THJS SECT1C\ 

/WILL eE EXECUTEC ANT A wALT WILL OCCUR 

/\u THE aC the XX RtrEFI^G ^r THE ERROR 

/CO\TlNJUE WILL RETRlFVE r**l CONTENTS OP THE AC AT THE TI"E 

/or ERRORf PRESSING CCN'iNUt AGAIN WII.L CvClE THE 

/TEST THAT FAILED PEKMANc»JTlv , ThE PROGRAM CANNOT BE 

/CONTINUED EXCEPT BT RESTARTING AT LOC 2!»0 OR AT SOME 

/OTHER L0CAT10^ THAT STARTS THE NE^T TESTi 

/ 







/ERROR 


1^11 ARE aSSOcIATcO WITH TEST 1,0 9/15 MODE ! 


JWITCH 


04734 


104045 


Hi 


JMS 


SETUP 




04735 


760001 




LAW 


1 




04736 


104045 


H2 


JMS 


SETUP 




04737 


760002 




LAW 


2 




?4743 


104045 


h3 


JMS 


SETUP 




04741 


760003 




LAW 


3 




04742 


104045 


H4 


JMS 


SETUP 




04743 


760004 




LAW 


4 




04744 


104045 


h5 


JMS 


SETUP 




04745 


760005 




LAW 


5 




04746 


104045 


H6 


JMS 


SETUP 




04747 


760006 




LAW 


6 




04750 


104045 


h7 


JMS 


SETUP 




04751 


760007 




LAW 


7 








/ERRORS 


13-34 


ARE ASSOCIATED WITW TEST 2 OATA PaTHS 


TRANSFERS 


04752 


104045 


H13 


JMS 


SETUP 




04753 


760013 




LAW 


13 




04754 


104045 


H14 


JMS 


SETUP 




04755 


760014 




LAW 


14 




04756 


104045 


Hib 


JMS 


SETUP 




04757 


760015 




LAW 


15 




0476P 


10404S 


H22 


JMS 


SETUP 




04761 


76002- 




LAW 


20 




04762 


104045 


M21 


JMS 


SETUP 




04763 


760021 




LAW 


21 




04764 


104045 


h22 


JMS 


SETUP 




04765 


760022 




LAW 


22 




2'4766 


10404«. 


h23 


J-S 


SETUP 




7 4 76?- 


76-0023 




LAW 


23 




0477« 


104f 45 


h24 


JMS 


SETUP 




4771 


760024 




LAW 


24 




i^4772 


104045 


H25 


JMS 


SETUP 




?4773 


760025 




LAW 


25 




■^4774 


104045 


-,3^ 


JMS 


SET^p 




04775 


76003 ' 




LAW 


30 




^4776 


104Z43 


h31 


JMS 


SETvT 




74777 


760031 




LA*' 


31 




'5000 


104045 


i-i3^ 


J"S 


3ETU = 




?5001 


760032 




LAW 


32 




?5002 


104045 


-33 


JMS 


SETjc 




.■"5003 


760033 




LAW 


33 




05004 


104045 


rl34 


JMS 


SETUP 





PACE 66 


IN0X15 


IN0K15 










75205 


76^03* 






LAW 




34 






/E«RO 


RS 


35 - 


42 


ARE iSSOrlATEO WITH TEST 3 CLEAR iVS^RUCTlCNS 


,-5?06 


104045 






J"S 




SETJt 


:5?07 


760035 






LAW 




35 


-5?13 


104045 


m4^ 




JMS 




SETUP 


:'5?ii 


760040 






LAW 




40 


35012 


104045 


h41 




J'^S 




SETUP 


^5P13 


760041 






LAW 




41 


75?14 


104045 


»-42 




J^«S 




SETUP 


.^5(?15 


76<?i042 






LAW 




42 






/ERRC 


!RS 


43 ,. 


52 


ARE ASSOCIATED WITH TEST « DATA PATi^ INTERACTION 


?5?16 


104045 


/ 

M43 




JMS 




SETUP 


C5P17 


760043 






LAW 




43 


J!5020 


104045 


M44 




JMS 




SETUP 


!'5021 


760044 






LAW 




44 


?5P22 


104045 


H4i> 




J«S 




SETUP 


35023 


760045 






LAW 




45 


?5e2« 


104045 


h5^ 




JMS 




SETUP 


?5025 


76005!? 






LAW 




50 


75026 


104045 


h51 




JMS 




SETUP 


f"5027 


760051 






LAW 




51 


?503? 


104045 


h52 




JMS 




SETUP 


75031 


760052 






LAW 




52 






/ERRORS 


53 . 


61 


ARE ASSOCIATED WITH TEST 5 CLEAR INTERACTION 


''5?32 


104045 


/ 

1453 




JMS 




SETUP 


.15033 


760053 






LAW 




53 


r!5e34 


104045 


h54 




JMS 




SETUP 


!'5e39 


760054 






LAW 




54 


/5?36 


104045 


h55 




JMS 




SETUP 


'5037 


760055 






LAW 




55 


f!5P.4(« 


104045 


m56 




JMS 




SETUP 


?5e4i 


76i!'056 






LAW 




56 


?5042 


104045 


»t>3 




JMS 




SETUP 


?5043 


76006? 






LAW 




60 


?5?44 


104045 


N61 




JMS 




SETUP 


?5!'45 


760061 






LAW 




61 






/ERRORS 


62-63 ARE ASsOCIaTCD WITH BIT PicKUP TEST 


?5?46 


104045 


W62 




JMS 




SETUP 


?5?47 


760062 






LAW 




62 


2^?5? 


104045 


m63 




JHS 




SETUP 


?5?51 


760063 






LAW 




63 






/E«P' 


:"$ 


62 - 


i:" 


4 ARS: ASSf^ClATED WjTh TEST 6 ADO TO AC AND XR 


.■•5.-'52 


104045 


/ 

^64 




jMS 




SETUt 


'5^53 


760064 






LAk 




54 


•'5''54 


104045 


^6i> 




j-s 




SETwC 


?5?55 


763065 






Li- 




65 


?5?5S 


1C4045 


Hfet 




j^'S 




SETJ = 


-•5:57 


76^0^6 






LAW 




66 


^625' 


1^4345 


«67 




j-s 




SETUP 


'5?61 


763067 






LAW 




67 
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ISiDXlS 



r.DXi5 



?.5ei62 

7!)e65 
f5i766 
t'5Z67 
?5?7:? 
05?71 
?5?72 
?'5?73 
051274 
?507S 
515076 
05P77 
?510?l 

t'Siei 

f5102 
515103 
05104 
05105 
715106 
05107 
05Jl?i 
?5lll 
05112 



P15114 
■35115 
05116 
05117 
0512? 
?5121 
^5122 
?5123 
05124 
?5125 
05126 
^5127 
'^513:^ 
05131 



05132 

^■5133 
25134 
'5135 

.^5136 
-5137 
? 5 1 4 r 
? 5 1 <j 1 
^5142 
?5143 
^5144 



104045 
76^37? 
1 S 4 4 5 
76^071 
104045 
76i'072 
104045 
760073 
104045 
7606574 
104045 
760075 
104045 
760076 
104045 
760077 
104045 
760100 
104045 
760101 
104045 
760122 
104045 
760103 
104045 
76017'4 



104045 
760110 

104045 

760111 
104045 
7651112 
104045 
760113 
104045 
760114 
104045 
76?ll5 
104045 
760116 



1 ? 4 1» 4 5 
760117 

104245 
■'6-'13.- 

76"1?1 

I04a4«( 

76.'122 
1 ? 4 4 5 

76.'^124 
104045 



-l7t' 


JMS 


SET'JD 






LAW 


70 




m71 


J^S 


?ET'JP 






LA^ 


71 




m72 


J^S 


SETUP 






LAW 


72 




h73 


JMS 


SETUP 






LAW 


73 




^74 


JMS 


SETUP 






LAW 


74 




h75 


Jf*S 


SETUP 






LAW 


75 




m76 


JMS 


SETUP 






LAW 


76 




m77 


JKS 


SETUP 






LAW 


77 




H100 


JMS 


SETUP 






LAW 


100 




W101 


JMS 


SETUP 






LAW 


101 




H102 


JMS 


SETUP 






LAW 


102 




H103 


JMS 


SETUP 






LAW 


103 




Hl04 


JMS 


SETUP 






LAW 


104 




/ESRO^S 

/ 

M110 


110 =. 


116 A«E ASSOCIATED wlTH TfsT 7 


ADO TO XR ANiD SKIP 


JMS 


SETUP 






LAW 


110 




Hill 


JMS 


SETUP 






LAW 


111 




hH2 


JMS 


SETUP 






LAW 


112 




.^113 


JMS 


SETUP 






LAW 


113 




t-114 


JMS 


SETUP 






LAW 


114 




HH5 


JMS 


SETUP 






LAW 


115 




H116 


JMS 


SETUP 






LAW 


116 




/E=*«ORS 

/ 

-117 


w - 


133 AHE ASSOCIATED wiTH T^sT 6 


I^iSTRUCT10^ EXERCl 


J^'S 


SETUP 






LAW 


U7 




.12^ 


J^S 


SETUP 






LA« 


120 




Hl2l 


JMS 


SETUP 






LAW 


121 




H122 


JMS 


SETUP 






LAW 


122 




.U24 


JMS 


SETUP 






LAW 


12'> 




►^125 


JMS 


SETJP 





PAGE 68 


IN0X15 


r-.oxi5 






?5145 


76?1?3 




LAW 


125 


t?5146 


1^4045 


-126 


JMS 


SETUP 


?i5147 


767126 




LAW 


126 


05150 


1?4245 


■'133 


JMS 


SETUP 


05151 


76?13.? 




LAW 


XU 


05152 


104045 


-Ul 


JMS 


SETUP 


05153 


760131 




LAW 


131 


25154 


104045 


h132 


JMS 


SETUP 


05155 


760132 




LAW 


132 


05156 


104045 


-133 


J'^S 


SETUP 


05157 


760133 




LAW 


133 






/ERRORS 


134-155 


ARE ASSOCIATED WITH TEST 9 DIRECT INDEXED ADORESSIf^G 


25160 


104045 


/ 

H134 


JMS 


SETUP 


05161 


760134 




LAW 


134 


05162 


104045 


Hl35 


JMS 


SETUP 


e5l63 


760135 




LAW 


135 


05164 


104045 


M136 


JMS 


SETUP 


05165 


760136 




LAW 


136 


05166 


104045 


H137 


JHS 


SETUP 


05167 


760137 




LAW 


137 


05170 


104045 


Mi4a 


JMS 


SETUP 


05171 


760140 




LAW 


140 


05172 


104045 


HI*! 


JMS 


SETUP 


05173 


760141 




LAW 


141 


05174 


104045 


M142 


JMS 


SETUP 


05173 


760142 




LAW 


142 


05176 


104045 


4143 


J^S 


SETUP 


05177 


760143 




LAW 


143 


(95200 


104045 


H144 


JMS 


SETUP 


05201 


760144 




LAW 


144 


05202 


104045 


Ht45 


JMS 


SETUP 


05203 


760145 




LAW 


145 


05204 


104045 


M146 


JMS 


SETUP 


05205 


76^146 




LAW 


146 


05206 


104045 


■^147 


JMS 


SETUP 


05207 


762147 




LAW 


147 


05210 


104045 


-4130 


JMS 


SETUP 


05211 


76019Z 




LAW 


150 


05212 


104045 


•^151 


JMS 


SETUP 


05213 


760151 




LAW 


151 


05214 


104045 


M152 


JMS 


SETUP 


05215 


760152 




LAW 


152 


05216 


104045 


H153 


JMS 


SETUP 


05217 


760153 




LAW 


153 


?5220 


104045 


Ml54 


JMS 


SETUP 


?5221 


76?154 




LAW 


154 


05222 


104045 


Hl5>5 


J^-S 


SETUP 


05223 


760155 




LAW 


155 






/ESRORS 


160-165 


ARE ASSCcJiTED ^ITH teSt 1?»I\PIRECT INDEXED AODSESSING 


?5224 


104045 


wl60 


JMS 


SETUP 


['5225 


76016,' 




LAW 


160 


05226 


104045 


r-161 


JMS 


SETUP 


5'5227 


760161 




LAW 


161 
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1^0X15 


IVSXIJ 






35230 


104045 


-162 


JMS 


SETUP 


?5231 


760162 




LAW 


162 


7^523?. 


104045 


>•1^3 


J^S 


SETUP 


05233 


760163 




UAW 


163 


?5234 


104045 


^lb4 


r'S 


SETUP 


?5235 


760164 




i,A-* 


164 


35236 


iei4045 


►-165 


J«S 


SETUP 


?5237 


760165 




LAW 


165 


^^5240 


104045 


h166 


J"S 


SETUP 


25241 


760166 




LAW 


166 






/ERRORS 


170-175 ARE ASSOCIATED WIT^ TEST ll.I^CIRECT 






/INDEXED 4UT0 


INCREMENTED ADDRESS 


25242 


104045 


/ 

Mi7a 


JVS 


SETUP 


05243 


760170 




LAW 


170 


{!5244 


104045 


^171 


JMS 


SETUP 


05245 


760171 




LAW 


171 


05246 


104045 


W172 


jMS 


SETUP 


05247 


760172 




LAW 


172 


05250 


104045 


wl73 


J^S 


SETUP 


?5251 


760173 




LAW 


173 


05252 


104045 


►*174 


JMS 


SETUP 


05253 


760174 




LAW 


174 


05254 


104045 


wl75 


j«S 


SETUP 


05255 


760175 




LAW 


175 


05256 


104045 


"176 


JMS 


SETUP 


05257 


760176 




LAW 


176 






/E=^aoR8 


20-232 


ARE ASSOCIATED WJTm TEST i2,RprERCNCE INSTRUCTIONS 






/INDEXED TO OTHER riEtOS 


05260 


104045 


H200 


J'^S 


SETUP 


05261 


76020!? 




LAW 


200 


05262 


104045 


M201 


JMS 


SETUP 


05263 


760201 




LAW 


201 


05264 


104045 


H2e2 


JMS 


SETUP 


05265 


760202 




LAW 


202 


0S266 


104045 


H2^3 


JN-S 


SETUP 


05267 


760203 




LAW 


203 


05273 


104045 


H22 4 


JMS 


SETUP 


05271 


760204 




LAW 


204 


05272 


104045 


>^2^o 


J^-S 


SETUP 


05273 


760205 




LAW 


205 


05274 


104045 


-'2^6 


J"S 


SETUP 


05275 


760206 




LAW 


206 


05276 


104045 


m2i7 


j-S 


SETUP 


05277 


7602^7 




!.A'^ 


207 


?53Z' 


10404^ 


~2:z 


J^S 


SETUP 


05301 


76021? 




LAW 


210 


-^5302 


104045 


"211 


J^S 


SETUf 


05303 


7602U 




LA* 


211 


05304 


10404^ 


•212 


j^-s 


SETUP 


05305 


760212 




L*'"' 


212 


05306 


10i0«5 


-213 


J^S 


SETUP 


05307 


760213 




lAW 


213 


05310 


104045 


■^214 


IMC 


SETUP 



V 



CAGE TZ 


INDXl? 


?5311 


760214 


?5312 


104245 


Z5313 


767213 


?&314 


124045 


;i53l5 


760216 


e53l6 


104Z45 


?5317 


765'2l7 


0532' 


104045 


^5321 


760220 


05322 


104045 


!15323 


760221 


35324 


104045 


35325 


763222 


Z5326 


104045 


35327 


760223 


3533? 


104045 


05331 


76?'224 


?5332 


104045 


215333 


760225 


35334 


104045 


35335 


760226 


05336 


104045 


05337 


760227 


05340 


104045 


Z5341 


760230 


05342 


104045 


JS5343 


760231 


35344 


104045 


35345 


760232 


05346 


104045 


Z5347 


760233 


0535f 


104045 


05351 


760234 


35352 


104045 


05353 


760235 


05354 


104045 


05355 


760236 


05356 


104045 


05357 


760237 


0536C 


104045 


05361 


760242 


05362 


104045 


e5363 


767241 


?5364 


174045 


?5365 


767242 


75366 


104045 


75367 


760243 


7537- 


1742<5 


75371 


7fr72«< 


75373 


- 2 4 ? 4 5 


05373 


76?245 


75374 


iC4e4!> 



IVDX15 

m215 
-216 
-.217 
^220 
^221 
h222 
h223 
h224 
-i225 
^226 
h227 
M230 
-i23l 
■(232 

/ 

h233 

h234 
h235 

h236 
1-237 

1-240 
-241 

.242 

-243 

► ?«4 
^?45 

.,?46 



LAW 214 

JMS SETUP 

LAW 215 

JMS SETUP 

LAW 216 

jMS SETUP 

LAW 217 

JMS SETUP 

LAW 220 

JMS SETUP 

LAW 221 

JMS SETUP 

LAW 222 

JMS SETUP 

LAW 223 

JMS SETUP 

LAW 224 

JMS SETUP 

LAW 225 

JMS SETUP 

LAW 226 

JMS SETUP 

LAW 227 

JMS SETUP 

LAW 230 

JMS SETUP 

LAW 231 

JMS SETUP 

LAW 292 
P 233-343 APE ASSOCIATED WlTM TEST l9-M0VlNC TEST 
fiAM TO UPPER CORE A'jO TRANSFER CONTROL TO TEST 



JMS 
LAW 
JMS 

LAW 
JMS 
LAW 
JMS 
LAW 
JMS 
LAW 
JMS 
LAW 
Ji-S 
LAW 
JMS 
LAW 
J^<S 
LAW 
JVS 
LAW 

JMS 

LAW 
J^S 



SETUP 
233 
SETUP 
234 

SETUP 
235 

SETUP 
236 

SETUP 
237 

SETUP 

240 

SETUP 

241 

SETUP 

242 

SETUP 

243 

SETUP 

244 

SETUP 

?45 

SETUP 
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nOXl5 



IK0X15 



e5375 


760246 




L*^ 


246 


r5376 


104245 


M2b,^ 


J^-S 


SETUP 


?5377 


76!'25f" 




Liv 


25P 


"bi?? 


104045 


-2t>i 


j"S 


SETUP 


^"5431 


76f251 




LAW 


?51 


£^54?? 


1^4045 


H?b2 


J^'S 


SETUP 


C54i!l 


76?252 




LAW 


?52 


P5404 


134045 


h2'=3 


JMS 


SETUP 


P5405 


760253 




LAW 


253 


."15406 


1C4045 


..?34 


JHS 


SETUP 


^■5407 


76H254 




LAW 


254 


.-'541? 


1^4045 


^255 


J«S 


SETUP 


?54U 


760255 




LAW 


255 


^-5412 


124045 


■,260 


J'-S 


SETUP 


05413 


76?l26r 




LAW 


260 


?5414 


104045 


h261 


JMS 


SETUP 


?54i3 


76(^261 




LAW 


261 


f54i6 


124045 


HI262 


JMS 


SETUP 


'.'5417 


762262 




I.AW 


262 


C5420 


104045 


^263 


JMS 


SETUP 


C5421 


763263 




LAW 


263 


""5422 


104045 


M264 


JHS 


SETUP 


C5423 


760264 




LAW 


264 


.'5424 


104045 


^265 


JMS 


SETUP 


35425 


760265 




LAW 


265 


:!5426 


104045 


^270 


JMS 


SETUP 


?5427 


76027? 




LAW 


270 


?543? 


104045 


m27i 


JMS 


SETUP 


25431 


765)271 




LAW 


271 


?5432 


104045 


h272 


JHS 


SETUP 


?5433 


763272 




L*W 


272 


?5434 


104045 


h273 


JMS 


SETUP 


'5435 


760273 




LAW 


273 


'5436 


104045 


m274 


JMS 


SETUP 


.'5437 


760274 




LAW 


274 


?544^ 


104045 


w275 


jvs 


SETUP 


.•'5441 


760275 




L Aw 


275 


?5442 


104045 


^33e 


JMS 


SETUP 


35443 


76^30? 




LAW 


300 


;:5444 


104045 


k.3:?l 


jMS 


SETUP 


?5445 


76213?! 




LAW 


301 


e5446 


104045 


m3<52 


JMS 


SETUP 


r5447 


76i53l?2 




LAW 


302 


r545f 


iei4045 


m3<''3 


JMS 


SETUP 


■^5451 


76??3?3 




LAW 


303 


:'545? 


104045 


h3.^4 


J^S 


SETUP 


r5453 


7603^4 




LAy 


304 


.:5454 


104045 


h3.;5 


j-S 


SETUP 


-5455 


76?3?5 




LAW 


305 


v'5456 


l?4f!45 


-312 


j"S 


SETUP 


;'5457 


76331' 




LAW 


31^; 


:546f 


1^4043 


.^311 


j-S 


SETUP 


="5461 


763311 




LAV 


311 


'5462 


104045 


w3:? 


J^'S 


SETUP 


'5463 


763312 




LAW 


312 
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IM0X15 



I\0X15 



/5466 

r5467 
;"547r! 
:'547l 
?5'«72 
?S473 
05474 
25475 
?5476 
05477 
?550? 
K5501 
05502 
05503 
05504 
05505 
05506 
05507 
t'.55l(» 
05511 
05512 
^■5513 
?5514 
05515 
05516 
05517 
05520 
05521 
P5522 
?5523 
05524 
05525 
05526 
05527 
Z5530 
05531 
05532 
05533 



05534 
05535 
?5536 
?5537 

?554? 
055*1 
05542 
05943 
05544 
?5545 
05546 
05547 



104045 
760313 

104045 
760314 
134045 
76031P 
104045 
76C320 
104045 
760321 
104045 
760322 
104045 
760323 
104045 
760324 
104045 
760325 
104045 

760330 
104045 

760331 
104045 
760332 
104045 
760333 
104045 
760334 
104045 
760335 
104045 
760340 
104045 
760341 
104045 
760342 
104045 
76^1343 
104045 
760344 



4543«?5 
160440 
170640 
?00123 
230077 
454321 
2511?3 
134026 
?52211 
'6314? 

200123 

33724? 



-313 


J-'S 


SETUP 




LAW 


313 


h314 


J^S 


SLTUP 




LA-' 


314 


-315 


J"? 


SETUP 




LiU 


315 


h320 


JMS 


SETUP 




LAW 


320 


m321 


JMS 


SETUP 




L*» 


321 


h322 


J^S 


SETUP 




LAW 


322 


w323 


JMS 


SETUP 




LAW 


323 


H324 


jvs 


SETUP 




LAW 


324 


tJ325 


JMS 


SETUP 




LAW 


325 


m330 


J«S 


SETUP 




LAW 


330 


^^331 


JMS 


SETUP 




LAW 


33i 


h332 


JMS 


SETUP 




LAW 


332 


W333 


J^^S 


SETUP 




LAW 


333 


H334 


J^S 


SETUP 




LAW 


334 


H335 


JHS 


SETUP 




LAW 


335 


H340 


J"S 


SETUP 




LAW 


340 


H341 


JMS 


SETUP 




LAW 


341 


h342 


jHS 


SETUP 




LAW 


342 


^,343 


JMS 


SETUP 




LAW 


343 


u344 


JMS 


SETUP 




LAW 


344 


/ 

/><ESSAGES 




^END 


.SIXPT 


• i4*ENt: 



• C V F 



,SIXBT ''/SOUICK vfRIfV PASSi FOR THCPCuGt^ TESTING' 



PA5E 73 1NDX15 I\DX15 



^sss:* 


:'!61722 


215551 


402410 


J"5552 


172217 


2S553 


250712 


.?5t>54 


402425 


05555 


232411 


?6556 


160700 


f!5557 


402305 


?556r! 


244001 


C5561 


C!3?34Z 


?6562 


704024 


05563 


174001 


05564 


406000 


05565 


77000C 


35566 


454311 


05567 


160405 


Z5575) 


304022 


05571 


^50711 


l?5572 


232405 


35573 


224024 


05574 


^52324 


35575 


551501 


05576 


111604 


05577 


?50355 


05603 


616555 


05601 


?46001 


35602 


030077 


05603 


454323 


05604 


052440 


05625 


.'20116 


05606 


134015 


05607 


170405 


05610 


402327 


05611 


112403 


05612 


104024 


05613 


174001 


05614 


406054 


05615 


400000 


05516 


202205 


05617 


232340 


05621 


220523 


05621 


?52440 


05622 


241005 


05623 


164023 


05624 


240122 


05625 


244543 


05626 


r077?? 


05627 


??5721 




.-0000? 


05630 


777777 "L 


."5631 


•525252 "t 


75632 


?52525 ^L 


05f33 


•'00J77 #1 


05634 


777377 •L 


05635 


.-00777 K 



.SIXBT I SET ACS 8 TO A 0»7i 



mTITlE .SlXBT t%#INDEX REGISTER TEST.Ma I NOEC-15-D0AOT ' 



'*co\y .sixBT 'xsset pa\k mode switch tc a K, I 



.SIXBT iPRESS RESET THEN 5TaRTX#!«?i 



Sm .SI2E /POINTER Tr END OF STOOiCE 

.E^'D 



PACE 74 



INDX15 



I^CXl? 



05636 

?5637 

l?5ft4r 

e5641 

P:5642 

?5643 

1?5644 

05645 

P5646 

?5647 

05653 

05651 

05652 

05653 

?I5654 

05653 

05656 

05657 

0566? 

05661 

05662 

05663 

05664 

05665 

05666 

05667 

0567^ 

05671 

05672 

05673 

05674 

05675 

05676 

05677 

?5700 

05701 

05702 

35703 

?5704 

05705 

?5706 

?5707 

tl57lC^ 

?5711 

?5712 

?5713 

":5714 

?5715 

."5716 

75717 

?572?' 



737000 

:'004c? 
777001 

f 00012 

r000;'2 

777776 

?000?1 
^00773 
62002f' 
440021 
620021 
?00003 
^^03741 
602011 
000005 

100000 

003763 
740000 
?07000 
760000 
000010 
700000 
!'01000 
000027 
003546 
^00036 
303576 
5)00026 
303635 
575634 
700011 
202143 

?00014 

630055 
300000 
377777 

604611 
177777 

?0020? 
74100? 
f^00077 
ri03045 
i'00043 
777740 
70024.'' 
.'?7777 

''0??:i7 

'^??2*:' 

?I2E 



•L 
•L 
•I 
•t 
»l 
•L 
•t 
•L 
»L 
•L 
♦L 
•L 
•L 
•L 
•L 
•I 
•C 
•L 
•I 
•U 
•L 
•L 
•U 
•L 
•L 
*l 
•L 
»U 
•I 
•L 
•L 
•L 
•L 
*L 
•L 
•l 
•U 
•L. 
•I 
•L 
•L 
•L 
•L 
•L 
•L 
•L 
»L 
•L 
»L 
•L 
•L 
»?5721 



s.r; EpoQ^ LiNt? 



.^ 



3 



